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A computer controlled colour graphics printer (16) which responds to input of personal information to provide an 
output of both personalized text and graphics which may be in the form of a greeting card, a poster or the like. Tlie appara- 
tus includes an input device such as a card reader (1 1) which responds to personalized data indicated on a card (30) by a 
customer or user, and means for storing temporarily the personalized data. The apparatus indudes means for inputting 
(I i, 12) and storing at least one standard pictorial background display plus appropriate text The apparatus includes fur- 
ther means (10) for converting the personalized data inputted by the card reader (1 1) into control signals for pictorial as 
well as text production appropriate to the background selected and the personalized data inputted. The apparatus includes 
pictorial and textual output means (16) which respond to the combination of background and personal data input to pro- 
duce a personalized pictorial and textual document. The method of this invention involves the recording of personalized 
data, the storage of at least one standard data which includes pictorial information, the method of converting at least some 
of the personalized data into pictorial representations, combining the standardized pictorial and textual data with the per- 
sonalized converted pictorial data plus textual data and printing a pictorial and textual product containing the appropriate 
mixed standard and personalized data. 
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PERSONALIZED GRAPHICS AND TEXT MATERIALS, APPARATUS AND METHOD 
FOR PRODUCING THE SAME 

BACKGROUND OP THE INVENTION 

Heretofore, one seeking to present a friend or 
associate with a greeting * card or a postdx has the 
following choices: 

1) If he has sufficient creative and artistic 
talent, he may take a blank card form or a poster and 
draw and letter an appropriate message, caricature, 
pictorial display or \*atever is desired; or 

2) He can seek out a greeting card or a poster 
retailer and look through the hundreds of choices of 
cards, attempting to find one which is appropriate for 
the occasion, and particularly for the recipient* 

Few fall into the first category and can make 
their own acceptable cards, and those who do truly find 
their talent appreciated, but most of all a great amount 
of time is expended in not only the creative but in the 
artistic aspects of making a card* Such activity is 
reserved by those who have that ability for very special 
occasions and persons. Most of us fall into the second 
category and have noted the frustration in attempting to 
find an appropriate card* 

In the case of children, one type of personalized 
gift has been developed vAiich is sometimes referred to as 
the "ME" book. These are picture books for very young 
children in which the name of the child and perhaps his 
address or the name of his pet are injected into the text 
of a book, which is then printed and bound in 
conventional form. These "ME" books have received a 
degree of acceptance, however, they are hardly 
appropriate for adults and because of the high degree of 
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standardization, allow only a few words to be 
personalized, and have a relatively short term interest 
for the recipient. 

The U.S. Patents Nos. 3,892,427 and 3,982,744 
disclose a process for manufacturing the "ME" type books 
and illustrate clearly that the insertion of the 
personalized textual material must be accomplished in the 
book printing enviroranent. Consequently, "ME" books are 
usually purchasable from the manufacturer or publisher by 
mail with a substantial time delay between ordering and 
receipt. 
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BRIEP STATEMENT OP THE INVENTION 

Faced with this state of the art, we set out to 
produce documents which are personalized in both the 
pictorial and textual backgrounds. The apparatus 
includes means for converting personalized data such as 
height, build, sex, hair line and the like into control 
signals for producing a pictorial figure having physical 
characteristics similar to the personalized data 
introduced into the system. The apparatus also includes 
means for introducing personalized text into standard 
text and for combining this resulting personalized text 
with the appropriate pictorial background. 

We devised a method employing a standard 
microprocessor which is programmed to provide the storage 
and combining functions after personalized data is 
introduced into the system by. temporary storage by the 
purchaser or user on a storage medium such as a punched 
card. 
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BRIEP DESCRIPTION OP THE DRAWING 

This invention may be more clearly understood 
from the following detailed description and by reference 
to the drawing in \(Aiich:- 

Pig. 1 is a simplified physical layout of a 
systCT of this invention; 

Pig. 2 is a block diagram of the system of Pig. 

1; 

Pig. 3 is a reproduction of one form of input 
device, namely a codable card for inputting personalized 
data; 

Pig. 4 is an example of a sports favorite 
pictorial representation to be controllably inserted into 
the standardized background under the control of the 
computer of this invention; 

Pig. 5 is an example of personalized text to be 
inserted into the standardized text of the control in the 
computer in accordance with this invention; 

Fig. 5A is an example of standard text to be 
personalized; 

Pig. SB is an example of standardized background; 

Pig. 6 is a flow diagram of the computer 
operation of this invention; 

Pig. SA is a flow diagram of the entire process 
of this invention; 

Fig*. 7 is an example of an overall. 
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DETAILED DESCRIPTION OF THE INVENTION 

In contrast to prior systems for producing 
personalized books, we have determined that it is 
possible, employing a microprocessor based computer 
system, to develop a system capable of not only text 
personalization , but graphic personalization .as well in 
producing books, posters, greeting cards and the like. 
This is accomplished employing the microcomputer system 
shown in Fig. 1, comprised of basically the 
microprocessor based computer 10, having two inputs per 
example from card reader 11 and keyboard 12 of a 
respective cabling or other links 13 and 14. The computer 
10, for example, may be Z80 CPU chip based, and 
communications may be by RS 232C ports. We have found 
that the S100 bus system. Model 2200 of California 
Computer Systems, Inc. of Sunneyvale, California is 
particularly suited for this use. It affords the 
flexibility to allow the same basic computer systan, by 
the addition of operating cards, to provide a broad 
variety of signal processing. THhis makes it possible to 
combine personalized text and pictorial information with 
fixed backgrounds and text. The input device 11 may be a 
Micro Mark 1 card reader produced by the True Data 
Corporation of Irvine, California. The manual input 
device keyboard 12 may be any of a number of standard 
keyboards, but we have found that the'Netronics keyboard 
produced by Netronics R&D, Ltd. is satisfactory for our 
purpose. 

The output of computer 10 over cable 15 is 
reproduced on plotter 16 which may, for example, be a 
Bausch & Lombe, Huston Instruments Division, DMP 29 eight 
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pen plotter. The plotter 16 is designed to receive paper 
up to 11 by 17 inches in size, blank or preprinted r and 
to move any one of the series of eight pens of different 
colors from holders, unshovm in the drawing, by carrier 
21 to positions on the plotting surface 22, to imprint 
any of eight different colors in patterns as controlled 
by the computer 10. As here described, the computer 
system is made up of standard components and becomes 
specialized on the additional plug-in firmware 
represented on boards 23. 

The system of this invention is interactive to 
guide the operator in the proper inputs to the computer 
and as such uses a monitor 24 which is viewed by the 
operator while sitting at the keyboard 12. Instructions 
such as "insert data card" appear on the screen at the 
beginning of the sequence, and if the data card is 
correctly read by the card reader 11, a message such as 
"card data entered" will appear on the screen. 

Now referring to Pigs. 2 and 3, the apparatus of 
this invention may be more clearly understood and 
illustrates that the input device, namely card reader 11, 
is furnished with coded card 30 of the type illustrated 
in Fig. 4. The user has blackened out appropriate 
squares as in the case of Fig, 3. He has punched out 
perforations, in the case of a punched card reader 11. 
in this case, the reader of the optical type is preferred 
and used. Data is- likewise enterable on the keyboard 12 
and therefore in Fig. 2 the normal direct data source is 
indicated by the solid arrow with the alternate data 
source indicated by the dashed arrow. Both the card 
reader 11 and the keyboard 12 provide personalized data 
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to the computer 10 into which the plurality of firmware 
cards may be inserted to vary the type of output product 
produced. The firmware cards are represented in Fig. 1 
by the reference numeral 17 but actually are within the 
computer housing 19, and are associated with the 
particular preprinted background or backgrounds 31 as of 
the types shown in Pig. 7 which are inserted into the 
plotter IS prior to plotting. Note that a buffer 32 is 
connected between the computer 1(5 and plotter 16. This 
buffer hasr for example, 64 bytes of memory and is used 
because the computational speed of the computer 10 is 
greatly in excess of the speed of plotter 16. The 
computer 10 is capable of driving more than one plotter 
on a time share basis and for that reason a second 
buffer, 32Ar indicated in dashed lines, and second or 
optional plotter, 16A, may be used with the system. The 
computer 10 may easily drive three plotters. During data 
input computation and throughout the entire process, the 
monitor 24 provides information to the operator. 

When the plotting is finished, the final product 
34 is a standard pictorial background interspersed with 
standard text which is modified by the presence of 
personalized text and personalized foreground pictorial 
information. The interrelationship of the standard and 
personalized information is best Illustrated by reference 
to Fig. 5B. In this figure, a small portion of the 
preprinted pictorial background of Fig. 7 is shown. The 
entire document as illustrated in Fig. 7 includes a 
number of sections, one of which relates to sports and 
hobbies. 
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Now referring specifically to Pig* 3, a card 30 
is shown in a form vAiich is in part readable by eye and 
in part optically read by card reader 11 of Figs, 1 and 
2. The card 30 includes lines for introducing the name 
of the subject of the card as has been done, in this 
case, SEAN, and other personalized data such as his 
birthdate are shown entered manually by pen or pencil. 

A number of personalized data are entered in the 
card by blacking out the appropriate choice, the first 
choice being three age categories; the second category 
for gender allows, of course, two selections. In this 
manner, the caricature, which will be printed, bears a 
certain relationship to the subject, specific enough that 
the person may be recognizable or at least recognized as 
represented in caricature. Also, it should be noted that 
a number of the selections and the general tone of the 
examples are humorous since this system is most 
frequently desired to produce a humorous type of poster, 
card or other form of presentable material but is not so 
limited. 

In addition to the data related to the physical 
characterstics of the subject, in this particular 
example, a sport or hobby is selectable. The 
demonstration and explanation of the operation of the 
invention is given where the subject or the giver of the 
presentation has selected each of the characteristics 
noted by the blackened in boxes on the card 30, and also 
has selected racquet sports as the sport or hobby of the 
subject. The optical reader 11 of Pigs. 1 and 2 is 
designed to scan a card which is inserted in its 
appropriate opening and register the data positioned 



wo 85/03152 



PCTAJS85/00064 



-9- 

aligned with any one of the optical index marks 30A 
appearing on the left hand margin of card 30. The card 
reader 11 therefore makes no attempt to read the 
handwritten name or birthdate or the demonstration block 
appearing toward the top of the card. The handwritten 
data is introduced into the computer 10 of Pigs. 1 and 2 
via keyboard 12. 

Stored in the memory of the computer 10f 
particularly in the firmware 17, are directions to the 
plotter to plot a large number of physical characteristic 
shapes which are associated with the selections made on 
card 30. As an example, in the case of noses, twelve 
different noses of various sizes and shapes, have been 
stored including directions for their location in the 
pictorial printout. These noses appear as a part of Pig. 
4 below the card 30. In this case, card 30 has been 
marked with a small nose of a male under 18 and the 
equivalent of Caucasion. Those criteria along with the 
particular sport selected, in this case racquet sport, 
denote that the encircled nose is appropriate. Similar 
selections are made for eye, mouth, chin and ear from 
stored pictorial data. The hair, denoted by the 
reference 76, has been selected on the basis of the sex, 
age, type, length and color of hair as well as the sport. 

As is apparent in Fig. 4, as partial figure 
holding a racquet, wearing a visor, in appropriate attire 
and about to be struck by a ball, has likewise been 
stored. The stored partial figure is selected on the 
basis of the sport selected as well as sex and in certain 
cases, age. 
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The size and shape o£ the partial Eigure and the 
blank areas left are selected and determined in order 
that each of the components making up a caricaturer in 
this case the hair> eyer nose, mouth, chin and ear, all 
fit within the appropriate open space to complete the 
partial figure of a racquetball player* Likewise, the 
outline shape of the racquet player, %4ien completed, is 
of appropriate size and shape to fill a blank area in a 
part of the background gravies of the final document to 
be delivered. In this case, a stylized hand is shown in 
Pig. 5A holding some playing cards with the nearest 
playing card having a space. Below the space for the 
caricature are other spaces available to take the 
subject's name and a personalized statement, related in 
this case, to the sport selected. In the example given, 
the subject's name, SEAN, along with the expression, "THE 
WILD RACQUETEER" , are inserted below his caricature. 

Fig. 5 in combination with Fig. 5A show the 
integration of personalized text into standardized text. 
In this case, the personalized text is the subject's 
name, SEAN, and the statement, *AT PLAY". Also 
appropriate but not required in this particular text is 
the substitution of gender terms such as "his" or "hers" 
based upon the selection of gender made on card 30. When 
completed, the document, which may be a poster, card, 
booklet or the like, includes the standardized text shown 
in Fig. 5A, the personalized text illustrated in Fig. 5, 
the background graphics shown in Fig. 5A, and the 
foreground, personalized graphics or pictorial display of 
Fig. 4-. The source of the personalized information is 
the card 30 with most, of the information introduced into 
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the computer by the card reader 11, but the actual 
spelling of the name and birthdate are introduced by the 
keyboard 12. 

The complete process from beginning to end is 
illustrated in Pig. 6 including the preparation of the 
background material, which is actually printed in a 
conventional printing manner in multiple color presses. 
An inventory of the backgrounds is maintained by the 
operator of the systan and the appropriate background is 
inserted into the plotter on its surface 22 where a 
personalized poster can be made. 

All of the various foreground personalized 
variables are drawn and furnished to a programmer to 
develop the program to control the selection and 
direction of the plotter to produce the selected 
personalized pictorial material at the appropriate place 
on the background-; This is done by developing the 
program and introducing it into firmware for the computer 
10. 

At the point of manufacture of the end product, 
which usually corresponds to the point of sale, the 
personalized data is introduced onto the card 30 and 
certain personalized data introduced by the keyboard 
operator at the time the personalized data is read from 
the card 30. 

The computer 10 stores the personalized data and 
personalized pictorial information as well as the 
standard text which is printed in addition to that text 
which may be on the preprinted background. The computer 
10 combines each of these inputs to develop control 
signals to the plotter 16 as to position, color, graphics 
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to be plotted, order of operations and conveys its 
conmands to the plotter 16, which then proceeds to make 
the completed plot^ 

In the example given in Figs. 4, 5 and 5A, a 
portion of a larger poster as illustrated in Pig. 7 will 
be plotted with the name, SEAN, appropriately inserted 
into the text. The sport quotation, "AT PLAY" is 
inserted into the text and the selection of variable 
facial characteristics, hair style and sport will be 
combined and printed in the background space of Pig. 5A. 
The titling of the caricature is accomplished under the 
control of the computer by insertion in the title line of 
Pig. 5A the subject's name and a characterization of the 
sport, in this case, "WILD RACQUETEER" . 

As final steps in the manufacture, the operator 
inspects the final product to make certain that proper 
registration has occurred between the pre-printed 
material and the newly added graphics and text, and that 
the caricature and comments are reasonable.* Hiereafter, 
the computer 10 and plotter 16 are free to proceed with 
the next plot. The cards 30, already made, may be 
retained to make duplicates or returned to the customer. 

The computational steps as well as the control 
and storage steps in the computer 10 are accomplished 
under the control of a program written, in this case, in 
Microsoft, basic 80 language available from the Microsoft 
Corp. of Bellevue, Washington and represented by the 
listing accompanying this application. The listing 
covers the steps for producing the sports caricature as 
described above and of course the full program for making 
multiple caricatures will be longer but constitute 
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basically redundant operations to those illustrated 
herein. 

The program which accompanies this disclosure 
includes statements 10 through 15420 in Microsoft Basic 
80 language. The steps carried out by the computer 10 
under the control of the program, reads the. data card, 
stores the data, makes the required selections, 
correlates the data to select appropriate images and 
causes the plotter to print the personalized text and to 
draw the personalized pictorial images. The subject's 
name is printed on a banner along with his birth date. 
In the example given, the background is selected on the 
bases of the subject's astrological sign for the 
particular humorous - example here disclosed. Other 
formats may be used. 

The steps in the program are basically as 

follows: 



STEPS 


FUNCTION 


10-430 


TITLE BLOCK 


440 


ALLOCATING MEM 


450-460 


INIT. DATE VAR. 


470 


TEXT SIZE SELEC 


490-640 


INPUTTING DATA 


650-940 


ASTROL. SIGN SEL. 


950-1010 


DATA VERIFY 


1030-1770 


CARD DATA CHECK 


1780-1840 


ASSGN. CKG. VAR. 


1850 


INIT.. CAP. ONLY 


1860-4400 


TEXT POSIT. BASED 
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4410-4450 

4480-5010 
5030-5200 
5220-5750 
5770 

5790-5960 
5980 

6000-6350 
6360-6380 
6390-6430 

PGM 

6460-9330 
9340-9380 

PGM 

9410-12289 
12290-12330 

PGM 

12360-12570 
12590-12600 
12610-12630 
12660-13390 
' 13940 
13950-14140 
14160-14340 

HAT 

14370-14430 
14440-14560 
14580-14590 



14- 

ON ASTROL. SIGN 
SELECTION 
Vim. SVD & LINKED 
TO NEXT POI 
SELECT NOSE 
SELECT EYES 
SELECT FACE 
CMIT GLASSES 
GLASSES SELECT 
OMIT BEARD 
BEARD SELECT 
PROFILE FEATURES SELECT 
MEM. SVD & LINKED TO NEXT 

SELECT HAIR STYLE 

MEM. SVD & LINKED TO NEXT 

SEL. ALT. HAIR STYLE 
MEM. SVD & LINKED TO NEXT 

GEN FILE NAMES 
PLOT BIRTH DATE 
SET BANNER POSIT. 
PLOT NAME ON BANNER 
ROTATE CHARACTER 
BANNER POSITION DATE 

HAIR SEL. IF NO SPORTS 

PLOT PERSONALIZED TEXT 
PLOT PROFILE 

PLOT BANKNOTE FRONT 
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FACIAL 



14710-14910 



PLOT PERSONALIZED TEXT 



14930-15050 



PLOT SPORT 



15060-15410 



PLOT PERSONALIZED TEXT 



15420 



RETURN 



the operation of the computer 10 under the 
control of the program as listed and acompanying this 
application is illustrated in the flow chart of Pig. 1. 
The listing includes the initial steps of selecting the 
background based upon the subject's birthdate and the 
length of the subject's name for purposes of spacing the 
neame on the final product. The steps thereafter relate 
to the processing to select appropriate facial 
characteristics, and sport or hobby for the personalized 
pictorial portions of the end product. 

The steps of the process include the reading of 
the data card and storing the data read in the various 
files as strings. Next the series of select functions 
from the stored permanent features occurs. The select 
functions depend upon the data of the particular subject, 
e. g. male vs female, under 18 vs older subjects, race or 
ethnic group and hair quantity and style as well as sex. 
Whether the subject wears glasses or not is selected as 
is his bearded or non bearded status. The sport or hobby 
selected on the card 30 is selected and the pr.esence or 
absence of goggles is determined for that sport. If the 
subject wears goggles according to the sport selected, 
the presence of glasses is ignored. 

In performing the select functions from the 
stored pictorial data, the following data inputs are used 
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in each respective selection. 

SELECT STEP DATA 



Select 


sport 




sex 




sport 


Select 


nose 


age 


sex 


race 


size 


Select 


eyes 


age 


sex 


race 


color 


Select 


face 


age 


sex 


race 


build 


Select 


glasses 


age 


sex 


race 


sport 


Select 


beard 


age 


sex 


race 


hair color 
style 


Select 


mouth 


age 


sex 


race 


sport 


Select 


hair 


age 


sex 


race 


hair color 
amount 
type 
sport 



After the selection steps are completed f with 
less than 9 selections, the sequential files are opened 
and thereafter the data in the files is read in sequence 
and plotted. After each file is incrCTientally read and 
plotted the files are closed and the sequence stops. The 
document is completed. 

Characteristic of this invention is the fact that 
a variety of physical characteristics of the subject are 
stored along with personal data such as their favorite 
sport and their name and birthdate. The various inputs 
are combined to produce a caricature and combine 
information as appropriate into the text whereby the end 
product in both words and picture assume a personalized 
nature for the recipient. The detailed nature of the 
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caricature is such it can allow the recipient continuing 
interest and amusement/ much more than merely the 
presence of his name in text^ which is also achieved by 
this invention. 

The foregoing embodiments are merely illustrative 
of this invention and are not to be considered as 
restrictive. It is recognized that one skilled in the art 
may make modifications of an invention without departing 
from the spirit and concept of the invention. Therefore 
my invention is instead defined by the following claims 
and their equivalents. 
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REn PROGROM -lOJMOR- IS THE SmRTHiQ PROBRflW 
REM IN R SERIES OF CHAINED PROQRfillS^ 
PRINT CHR$(a6) ; 
40 IF NE=1 THEN 

PRINT " 



50 
GO 
70 
80 
90 



i:70 
390 



PRINT "I II 
PRir4T II 
PRINT -I CCCCC I I PPPPP 

PRINT "1 C I - I P P 

100 PRINT -I C I I 

110 PRINT "I C I IP 

130 PRINT "I CCCCC I I P 

130 PRINT "I II 

140 PRINT - — — " 

iS0 PRINT 

iS0 PRINT Zl^sPRINTsPRINT ZE^f PRINTiPRINT 239iPRINT Z^SiPRINT Z5«- 
t^O-PRINTcPRINT Z6$«PRINT Z7«:PRINT ZG*iPRINT Z9» 
180 Zlf--CQPYRIBHT COMPUTER HUMOR SYSTEMS, INC. 1983. 
190 PRINT 

200 Z2*="flLL RISHTS RESERVED INTERNflTIONfll. COPYRIGHT SECURED. 
310 PRINT 

2EO*Z3*«-POS9ESSIdM OF THIS PROGRAM DOES NOT CONVEY RNY RIBHT TO" 
230 ZA«5=" REPRODUCE, USE OR SEUL THIS PROBRflM OR THE INFORMPTION- 
2A0 Z5*-"CONTfiINE0 THEREIN." 
350 PRINT 

160 Z64-="TIIE RECIPIENT IS HEREBY V/flRhlEO THftT UWflUTHORIZED REPRODUCTIOM" 

Z7t=-OR THE USE OF THIS PROQROM IS SUBJECT TO BOTH CIVIL AND CRIMIKHL" 
Zei^-PENPLTIES UNDER THE UNITED STATES COPYRIGHT LAWS AND THE LAWS" 
Z9»«"OF MANY SFAIES AND COUNTRIES." 
300 Rgfl CARD SUDRUTINE FOR MAIN PROGRAM 

310 DEFirrr a-z ^ 

330 PRINT "INSERT A BLANK SHEET OF PAPER INTO THE PLOTTfeH** 
330 LINE INPUr "THEN HIT THE RETURN KEY WHEN READY" lAN* 
340 LPRINT "fsH A" 

350 SiZES^^^'-lO© SO SCS5,M3,X-1, Y 99)-5LPRINT Zl»lTEfr|"U P2- 

360 LPRINT SIZE2»;Z3>|TE*|"U P3" 

370 LPI^INT SIZE3«;Z3«iTE*?"U P4- 

380 LPRINT S1ZE3*;Z4*|TE*}"U PS" 

390 LFRINT SIZE3« ? ZS« fTE* j "U PS" 

V00 LPRINT BIZE3t5Z6«;TE«|"U P7" 

^Itd LPRlNr BIZE3*|Z7*|TE»t"U PI" 

^30 LPRINT SIZE3l!;Z8»;TE»rU P3" 

430 LP'^INT SIZE3«5Zg*jTE*|"U PI" 

4A0 DM 0(80), r$(30> 

450 "xDA*=" -- "»DATEf«" " 

460 iNpUT "ENTER NAME ";NA» 

470 BIZE1*=-S(S3,W3,X-1,Y 99> - sSIZE2»=»-S{S3, W3, X-1, Y 99) "8TE»-CHR»(95) 
480 IF LEN(NA«)>10 THEN PRINT "NAME TO LQN8 "iGOTO 460 

490 INPUT "ENTER MO ";MO»JlF LEN<MO») (3 THEN MID* (DATE>, 1, 3>-*'0"+MD»iB0T0 310 
500 MfP* (DA TEe, 1,3) «M0» 
"510 IF VAL(M0«)=»O THEN 550 

S30 FOR 1=1 TO 13: READ Mr>l«, M, X, Ys IF VAL(MO»)=M THEN MON«**1N»lXl«X t Y1«Y 
530 NEXT I 
5%0 GOTO 580 

550 FOR 1=1 TO 131 READ MN*,M, X,Y 

560 IF MID»(MO», 1,3)=MID*1MN», 1,3) THEN MON»«stnNSiXl«XiYl=Y 
570 NEXT I 

580 INPUT "ENTER DA ";OA«tIF LEN(DA») <3 THEN MID»U)ATE», 3,3) -"0"-H109rB0TO 6SO 
590 MID$(DArE»,3,3)»DAS 
600 BD=VAL(DATE«) 

610 IIOPUT "ENTER YEAR ";YEsIF YE < 100 THEN YE-YE+190O 

630 DATA JAtaJARY, 1,410, 170, FEBUARY, 3, 400, 150, MARCH, 3, 410, 175, APRIL. 4 , 410, 175 

630 DATA MAY, 5, 450, 330, JUNE, 6, 433, 190, JULY, T, 433, 190, AUGEST,.8, 410, 170 

640 DftTA SEPTEMBER, 9, 380, 130, OCTOBER, 10, 410, 170, NOVEMBER, 11, 400. 150, DECEtt^H. 13 
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60O ir S>tf! HEM 8=1 

6V9 GOTO i«»35» eTi+-"rfipnicomi-»sia*«"nnunnius''t9-iiBOTo 66e 

71© IF DO'SIO nMl) I?D<aSl THEN 9\»':;"fj2F8"fs{p9=-nniR9" . 56f) 

stS f pu>;v-i mil) mM6t?i tiieii siGr4-»-GemHi-.B-6 

floo r n mil) p.)<on3 iiieu sibio-i.eo-.s-b 
r P. Ma'. ON., pocj^es iheii sieHi>.«vinRa".S"9 

ir n iiq-^'. mil) UDd-SSS THEM 3IGM*-"HnRn- iS'-I^ 

lee rnnii -niwi- "'sip"* 1032 LINE INPUT "HIT THE EETURN KET WHEN;AN$ 

^ir:"' "'w ^imr "insekt crio)- . . 

letCI IF mJI!'="y" THEM 1830 

US rirrncS .^1?: f» • 1045 print -card data ENTERED" 

1050 nfiH CHECK f='Dn nPF- 

1079 ir IXD^-PR TIIHN fit"" T" 

1930 REM r.'HECI'. FOR SEX 
.lltfl-p ir D<2)«»-^3 THEN D5«''M- 
11 10 ir D(21=P6 MIEN 9ii-"F- 
112© REM CHECK FOU llflCE 

1130 ir i)(3>^pi THEH i:*=^**n« 

lUlO IF U(3)=P'» THEN C*-i-Vr f Ci:»=i-M- 
1150 IF IK3)^P7 IHEM U!r.«-f»- 
1160 IF U(3)=P9 THEN Ct^^W 
1170 HEW CHECi; FOH IIPJR TYPE 

lino IF u</i)=pa THEM ot^^no" 

1190 IF l)('O^P6 IHEN l>t=-TO" 
12m IF THEM D-f*CH- 

1810 ir i)<ri>H»a then i)«^"sb" 

l£20 IF l)(S)^P6 Tin-N Dt="Me- 

1230 ir D(S)«P9 niEti OS(=-"LL" 

12/10 HEW aiECK Fon HO in COLUn 

1E50 IF l)(6>=P& TMEM E*="l)- 

1250 /F 1)(&>=P3 THFM E1i«"L* 

1270 REM CHECK F0« Hr>in STYLE 

1280 If Dt1)-P3 TJIEH f% c»*Wv" 
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Its© IP 0(7)^ PS TMEH F^-tV* 

IP Dl7)=P9 TUET4 F*o-U0- 
1310 IF D(0)=P3 THEN F^^TZ" 
1330 rF D<a)=P6 THEN Ft-^AP" 
133© IF D{8)=Pg THEN F9s»-ST- 

1340 REM CHECK FOR BEARD OR HU3TftCME 

1350 IF D(9)=P9 THEN B^a^hn^J" iBDTO lAOO 

136C IF J)(10)=Pa THEN Q»«-QS- . 

1370 IF DC1Q)=P6 THEN S^-'MS" 

13S0 IF D(10)=P9 THEN GS=»»FB" 

1330 REM O-tECK FOR SIZE OF NOSE 

1400 IF DdD^P^ THEN H^-^LG" 

14^10 IF U(l I )=PT THEN H«»"WD- 

IA20 IF D(1U«P9 THEN HS^-SM" 

1430 REM OHECK FOR GUISES ' 

1440 IF D(12)=P6 THEN I<!=»"V 

1450 IF D(12)=Pa THEN I«="N" 

IA60 REM CHECK FOR SIZE OF PERSCHM 

1470 IF 0<13)=PS THEfJ J«»"TH'' 

1480 IF D(13)=P3 THEN J»«-nV" 

1490 IF U(14)«PS trtEN J*&="Fft" * 

1500 IF 0(14)=P3 THEN J*=»"OV" 

1510 REM a^ECK FOR TYPE OF SPORT 

15£0-IF 0<15)=P1 THEN SP 1««=- CHANNEL* t9P2»—'CHflNBER- « SCI ♦-"VIDEO VOYEUR" fSP-l J BF9 
tS) «*'SM4- sSF« <0> «"S014" 

1530 IF D<15>=PS THEN SPIS^-HET" iSPat»"DREflMS- tSCl*--P00U SHARK" »SP-2jSF» (8) -•SM 
2- iSF* (0> =3"S02" iG-l 

1540 IF D(2>=P6 THETJ SCl^^'WfiVE MAKER"! BF5 <0) "•*S03- :G-1 »H«1 

1550 IF D(15)=P9 THEN SPl*="BIBLIO-- iSP2»«"MANIA" iSCl»-"POCKETBOaK PEEKER- tSP«3i 

SF»(S)«"SMS-iSF«(0)=**SO23" ^ ^ 

1560 IF D(1S)=PI THEN SPl»»"PERFECT- iSP2*«-P ITCH" i SCI >--BEAT PICKER" iBP-4tSF« <B> 

="SMS" sSF»(0> ="S022" :H='l 

1570 IF D(1S)=P6 THEN BP 1*=" MUSCLE" sSP2»»" BOUND- 1 SCI*-" WEISHr WATCHER" t8P-5*SF« f 
8)«"SMl''sSF«(0)«"S0g" 

1580 IF D(16)=P9 THEN BP1«»-TRAINING" iSP2»»"WHEELS" lSCl*-"PEDftL PUSHER" tSP-6 1 SF» 
(B>«"SM2" s5F« (O) ="S03" sH=»l 

1590 IF D{17}=P1 THEN SP1$=»"H0LE" iBP2»»- IN ONE" : SCI »-" RECKLESS DRIVER"tSP-7i6F*( 
8) ="SM5" :SF« (0>=»"SOlt" :H«1 

1600 IF D(17)=P6 THEN SP1*=»"HEAVY" iSPa*«-HANDED" f SCI "KICK STARTER" iSP-S I Sf^S-ta) 
=*"SM3":SF4{0>«"S06" 

1610 IF D<17)=P9 THEN SPlS=»"eUTTER'*sSP2$=«"TH0UGHTS" tSCl»«"HIGH ROLLER* i5P-9iSFO( 
e)«"SMS":SF*(0)="SOlS" 

1620 IF D(ia>«=Pl THEN SPl »="BLiZZARD- »SP2S«"AREA** iSCl»-"HOT DOGGER" tSP-lOiSFS (0) 

=»"SWS" I SF« t0) =*"Sai0" iB=l sH=l 

1630 IF D(ia)=P6 THEM SP 1»« "COMPOST" I SP2$»" HEAP" i SCI ♦-"SEEDY CHARACTER'' i BP* H fSF 
♦ <e)="SM3" sSF*(0)a"SOl6":H=»l 

1640 IF D(2}»P6 THEN SC1«»"PANSY PUSHER" x8F» (O) »"S017" :H«1 

1650 IF D(18)=P9 THEN SP1«=»"0FF THE" I SP2*-" TRACK " i SCI ♦-"SNEAKER STREAKER" i BP- lEt 

SF«(a)="SM2"sSF»(0)-"S019" ' 

1660 IF D(19)«P1 THEN BP lt=" WANDER-" :SP2*-"LUSTr i SCI »-"JAUr4TY JET SETTER'^iSP^ia* 
3F« (8) ="SM5" » SF^ (0 ) ="S021 " t B=l t H= 1 — 

1670 IF D(19)=P6 THEN SP1*="0UT OF" tSP2*=»" BOUNDS " i SCI ♦-"BENCH WARMER" J SP-14tSF*( 
8) =>"SM5" :SF« (0) =*S026° iH=t 

1680 IF D(19)=P9 THEN SP1*="PARTY- iSPS^-^BAMES" iSCl««"SOCIAL WHIRLER" iSP-l3tSF»< 
8) »"SM4" iSF'* t0J -"S024- :H=»1 

1690 IF DC20)=P1 THEN SPl*-"SaMETHlN8" iSPe*-"FlSAY" tSGl^-"WORM WRANGLER" iBP=»lBiH 
F4<8)«"SMl'':SF»(0)=»"S04"sH«l 

1700 IF D(20>«P6 THEN SP1^=-S0RE" 5SP2*»"FEET* iSCl^»"WlLD GOOSE CHASER* I SP-l7iSFt 
(8> ^"SMl " iSF3 (O) »"SQ12" :H=1 

1710 IF D(a0)=P9 THEN BP 1 4t- " SKETCHY " :SP2^-" FACTS" I SCI ♦-"CRAFTY DEVIL" :SP« 18 tSFac 
a)-"SM6":SF«<0)-"SQ2a"»lt='l 

1720 IF D(21)=P1 THEN SP1S="DEAD" iSP2*-" RECKON I NB*S SCI ♦-"DIN8Y ADMIRAL" f BP- 19 »SF 
♦(B) -"SM5" sSF* (0) ="SO20" iM=l 

1730 IF D(.'^l>=P6 THEN SP !♦-" STACKED ": SP2^»" DECK" I SCI ♦-"DICEY DEALER" iSP-aO I SF^ C t 
) -"SM6" iSF* (0) ="S013" tG»l 

t7A0 IF 0(^i)=P3 THCT Spl^-"TMO left- tSP2^-'-PHfrr- 5sei*-"F/w:Y F0(rrw5TtKETl";sP =21- 
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?;;;^rDS>^r^EN's;i*-eENlUS-.SPa*=-WETHflnE-,SCl»--JOY STICK JI68UER-.8P-a 

4] SF» (8) =»"SMA" tSF« (0) ^^SOIS" 
1780 IF B«a"F" THEN SFSia)*-**" 

1790 IF «»«-fl" AND B»="M- RND C«-«B" THEN SFSO)-"- 

Hn»=A»+8«+C*^e»*F«tD«.IF fl*«-T" THEN Hfl*-0-*B»+C»+E»+F*+Df 
1820 IF C»="W- THEN HP*=ft*+B«-«'»a"+E*+F«+D» 
1S30 IF 0*="T" AND C»="W" THEN HQ»="fl-+B<4.-0-+e*+F«+D» 

, 1, n«NX»lNEXT I 
I860 REM 

1870 REM »♦ THE INNER NAME ♦* 

1880 T»(l>=^"l«C 2 "•♦•SIZE2*+"THE- 

1090 REM ** SrtPLL NOME IN PROFILE ** 

1900 T'>(2)="24A0 100 S(S3,W2,X-44,Y 90) -•^-NfltfV't s-+TE» 

1910 REM *♦ HOBBY'^ONE ♦»» . . .^v i 

1920 TX«=-£630- :TY*=STR« (324-K ( INT ( O-UEN <SP1«) ) /2> ) «12) > 

1930* TN*=sTX«+TY«+- "+S1ZE1$4-SP1» 

1940 T* ( 19> «»TN«-hTE* 

1950 TX«»*'SB50" i TY*=^TR1i (310 >-( ( INT( (9-LEN (SPS>) ) /2V> *ia> ) 
1960 TN*«TX*+TY«+- -+SIZE1»'^SP2» 
1970 T« <20>=TN«+TE* 

1980 REM YEHR ^ ^ ^ 

1990 T4(1A>=-310 310 S(S6,WA, X 76, Y 1 -^TE* 

£000 T«(IS)="33S 323 S(S7,W4,X 76, Y 64)9"+TE* 

2010 TX=VnL(VEfiR*)-1300iTX«=STR»<TX) 

2020 T*(16)«"360 348 S(S8,W4, X 76, Y BA) •+TX»+TE$ 

2030 T*(17)="300 340 S(S8,WA,X 61, Y 98) "+Dfl*+TE1^ 

^040 T*(igUsTR*(Xl)-^STRV<YlU- S<88,W4,X 63, Y 76) BORN -^ON»*TE» 
2050 IF VOL(Dfit)=l THEN 2090 
2060 IF VPL<D0«)=21 THEN 2090 
2070 IF VfiL(DR*)=31 THEN 2090 

2080 GOTO 2100 ^ 

2090 T«(1B)="520 A10 S(Be,W4, X 7, Y 99) st, --»-TE*:BOTO 222© 

2100 IF VnL<Dfl*>=2 THEN 2130 
2110 IF VflLtDO*)«22 THEN 2130 
2120 GOTO 21 '10 

2130 T«(te)=''520 M0 S<SB,V)4,X 7, Y 99) nd, -+TE«iGOTO 2220 
2140 IF VnU(Dn«)=»3 THEN 2170 
2150 IF V0L<00»)=33 THEN 2170 

2160 GOTO 2180 ^„ 

2170 T'»(18)="S20 410 S<S8,W4, X 7, Y g9)ird- ''+TE«iGOTO 2220 
2180 REM DAY 4-20 24-30 

2190 T$<ia)="5a0 410 S(80,W4, X 7, Y 99)th.-+TE5 
2200 REM NAME FORTUNES 

2210 REM RIGHT JUSTIFY 

2220 TX*="2'i20"« TY*»BTR1i(9a0+INr ( ( lO-LENtNO"?) )*17.3) ) 
2230 Tfi(3)=TX4^'rY^+- «+5IZE2»-»-NR*V S •••i-"FORTUNES--»-TE» 
2240 REM 

2250 REM NPME (SMALL) 

2260 REM M^Hi* CENTER JUSTIFY iUHHf* 

2270 TY-S^STRa (926+ < C INT ( ( 10-LEN (NA*) ) /2) ) ♦12) ) |TX»-"2281 - 
2280 TN«=»TXSi+rY*+" "+SIZE19+NA» 
2290 T4(4)«7N*+TE5 
2300 REM 

2310 REM Bye Bye HHME 

2320 T«<5)«"2971 928 -+3IZE1»+-Bye Bye"+TE« 

2330 TY«=STP'6 *95»0 »- ( ( I NT < ( 1 0-LEN (NA*) ) /2) ) ^12) ) t TXt--3001 - 

2340 TB1i=TXt!i IY»»-" "+SIZEl$+NA* 

2350 T'»(6)«TB5+TE* 
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^VO iltM rOflME IN LOVE ♦* 

23BO TY*=STR* t IB 1 1+INT ( ( l** -UEN (Nfl*) ) ♦IT. 3) ) iTX««- 1 120- 
2390 TL»=»TX*+TY«+" --i-aiZE.^ i-Nfl* 
2400 Tt(7)=TLS+Te« 

2410 T»(a)=-1170 1666 -+SIZEa«+"IN LDVE"+TE« 

2420 IF SOI THEN 2620 

2430 T*(l)«"I3a3 17 ••+SXZE2*+''THE" 

2440 REM IN U3VE 

2450 TY»«STRai ( 181 1-Hr^T ( ( 10-LEM (NH*) > ♦IT. 5> ) i tX>»« 1 120- 
2460 TL«=»TX*+TY*+- "^SIZE2$4NA> 
24T0 T5(T)aTL»+TE* 

2480 T»(8)«"11T0 1B6& "+SIZES«+-1N LOVE"+TE* 
2430 REM OT PLPY 

£500 TY*=STR*(18O0+INT(C10-LEN(NO»>>*17.5)) tTX»«"2120* 
2510 TP«=»TX*+TY9+- -+S1 ZE2*+Nfl» 
2520 T« C9) «TP*+TEi 

2530 TS(10>»"21T0 185S "+SIZE2**-PT PLfly"-KTE> 
2540 IF B»«"M" THEN 25T0 

2550 T*(11>«**1550 1420 "-^SIZEl*+-hls"+TE* 
2560 GOTO 2560 ' ' 

2570 T»(ll)="1550 142® ••-•-SIZEl»+"he»-"-»-TE» 

2580. TX«="1510*'iTY««=SrR*(1530+lNT( <l0HJEN(Nfl*) >-»12> ) 

2530 T* (12>=TX*+TV«+- ••+SIZE1*+NR»-^TE* 

2600 REM GRP. NAME MflLE«**HER" FEMflLE-^HIS" 

26 lO REM CHECK FOR FEMRLE 

2620 IF SO 2 THEN 2TT0 

2630 T*(l)=*-1235 IT "+SI ZE2**-THE* 

2640 REM " IN LOVE 

2650 TY't=STR* ( 18214-INT ( ( 10-LBa (Nfi* > ) ♦IT. 51 ) rTX»-- 1 140- 
2660 TL3i='TX«+TY«+" -+SIZE2*^fl« 
26T0 T'B(T>3TL*+TE* 

2680 T*(8}="1190 iaT6 ••+SIZE2»-^"IN LOVE^+TES 
2690 REM or PL9Y 

2700 TY*=STR^P ( 181 1+INT ( ( lO-LBJ (Nft» > ) ♦IT. 5> > »TX*»"2130'' 
aTlO TP«=TX**TY*+" ••+SIZE2*+NftS 
2720 T*(9)«TP*>TE« 

2730 T4<10)="2ie0 1866 "+51 ZE2»+"flT PLflV-^TE^ 

2740 TX«="1500" sTYS^Srn* (1530-HNT( < l0-LEN<Nfl») ) ^12) ) 

2750 T« (ll>=TX»-»-TY€-»''' •'+SI2E1»+Nfl»+TE« 

2760 REM OUU. NAME 

2770 IF SO 3 THEN 2310 

2780 T«(1>=''1260 3 '•+SI2E2$+"THe** 

2730 REM IN LOVE 

2800 TY«=STR*(1821+INT( (10-LEN<NRa>>^17.S)) «TX»-"1150- 
.2810 7L*=TX*+TY**" ■'+SIZE2«+NR* 
2B20 7S(7)=TL*+TE* 

2830 T«(8)«"1200 1876 ''+3I2E2*+" IN LOVE"-^TE» 
2840 REM AT PLAY 

2850 ry^^SrW < 1819-HNr I ( 10-LEH <NA»> ) ♦17. 5) } »TX»-"2120" 
2860 TP*=TX«i-rY»+" -+SIZE2»+NA» 
2870 (3)=TP*+TE» 

2880 T«( 10) =-2170 1874 •*+SIZEa'»^-nT PLflY-+TE« 

2890 TX*«-1490-tTY»=»STR»C17S0+INr(<l0-LENCNflt) )^12> ) 

2900 REM PISCES NAME 

2910 IF S04 THEN 3100 

2320 T«<1)=-1360 9 -+SIZE2»4-"THE" 

2930 REI4 IN LOVE 

2940 TY*=STR*(180l+INTt(10-LEN(Nfl»> > ♦17.5) > :TX«=»" 1128* 
2950 TL*='TX*+TY*+" •+SIZE2*+Nn» 
2360 T?17)=Tl-«+TE» 

2970 T*KB)="117a in56 "+SIZE2«+- IN LOVE"+TE« 
2980 T«(H)==rx*+TY«+" "+SlZEl*+NA»-»-TE4 
2330 RETI AT PLAY 

3000 TY«=?SrRfi (1739+ INT ((10-LEritNAr>) )»17.5)) :TX»-"2135'* 

3*10 -r ^sTXi^vTY^*- "*3U€e^wA^ 
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llll «t3,=TXt*fY*-^" -■►SIzeS**Wn»*-3 »K.FOnTUNES--TE» 

3089 T*tll)=TX»*TY«+" -+SlZEl»+NO»+TE* 

3090 REM RRIES NOME 
3100 IF SOS THEN 32SO 

3110 REM TAURUS NflWE -. 
3120 T«<l)=-i8l0 9 -+8IZE2S+-THE" • 

3I40 ??*WrR» ( 10M*INT< , 10-LEN(NA,, >»17. 3> , .TX.=-1 120- 
31S0 TL«=TX»+TY«»-" -+SIZE2»+Nn» 

V*\l\:"\V7riBBS -.SI2E2..-IN LOVE-.TE* 

all? ;?S=8?W UsIl.INTC t l0-LENtNfl*) .MT.S* > ,TX»-2130- 
3200 TPS=TX«+TY«+" -+SIZEa«+NO» 

3!^ ^«i-Ua0-^TV«=.3TR» ( 1590+lNT < ( 10-LEN«Nn.> )»12l > 

3ZtO Tt<ll)''TX4+TY«+" -+SIZEl»+Nfl«+TE» 

3230 IF S06 THEN 3430 

3260 REM BEMINI NOME 

3270 T*(l)=-1250 3 -+SI ZE2*+"THE- 

11^ ?y"=STn*(l^H-INT(tl0-i-EN(NO»>)»17.S>>.TX.-1133" 

3300 TU»=»TXt+TY*+" "+SIZE2«+NO« 

332? ?*lal=-ltB?*B66 --^SIZEa**" IN LOVE--TE* 

ISl ?Y«=s?n*1'r^Il-.-lNT( (10-LEN<NO»» >«17.S) ) .TX»-8130- 
33S0 TP«=TX«+rY«+" "+SIZEE«+NO« 

S7S lV<V^l%V^*iS^ ..SIZEa.."«T PLfiY.*TE. 

s?; ?xU:20"?;?.sj;f;si^^^^ 

S Ta(3)=TX»*TY**" -♦SIZE2«+Nn*+"'S -+"F0RTUNE8-+TE« 
3410 TX*--1470-.TY»=STR»(1530+INT(tl0-UEN<Nfl»))»ia>> 
3420 .Ta<ll)=TX«+TY»i-" "+SIZEl*+NO«+TE* 
7430 IF SO 7 THEN 3620 

Itf^ REM CRNCER NOME MflLE-"HB» . FEMPLE-She- 

3450 REM CHECK FOR FEMRLE 

3460 r«(n='"1380 1 "+SIZE2«+-THE" 

3470 REM IN LO»/E tv*-..i i 

3480 TY.6«STR*< ISig+INT ( ( 10-LEN <NA»> ) ♦17. S> ) :TX»«" 1112 
3490 TL«='TX*+TY4+" »+SIZEa*+NA» 
3S00 T*» (7)=TL*+TE* 

3510 T«<a)^"1162 1874 «+SIZE2*+"lN LOVE-+TE> 

3530 ?y*=StL rTsi l-*-INT ( ( 10-LEN (Nfi*> > ♦I?. 5) ) iTX»«"21 IB" 
3540 TP»=TX*+TY*-»"" - +S I ZE2«-HMO» 
3550 T* (9)«TP«+TEa 

3560 T4(10)»-216a 1866 ZE2*+-AT PUAY-+TE» 

3570 IF Bi^^M" THEN 3600 

3580 T«(11)='"1S50 1420 -+S1ZE1»>-She"+TE» 
3330 GOTO 3610 

3600 TidD^'-lSSO 1420 "+5IZE1 *+-Mb"*TE» 
3610 T«<12)=-1460 1S30 "+SI Zei*+NftM*+TE» 

3620 IF SO 8 THEN ^BZ^ ^ n kiomc 

3630 REM LEO MRLE= - Woman % NftME FEMALE--Men% NAME 

3640 REM CHECK FOR FEMRLE 

3650 T«(l)=*"i270 9 -+31 ZE2«+"THE" 

3660 REM IN LOVE . 

3670 Tyi=STIV$(f8M+lNTt(10-LE«W$n*l7.^; :TX$»''n20- 
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36H0 Tl4=^TX$+TY^*" '•+SZ^+NA^ 

359®- T« (7)=TL$ iTE$ 

3700 T«t8}=-ll7(a 1866 -4 -'ZEa*-*-** IN UOVE-+TE« 

3710 REM or punv 

3723 r/*=STn*f I8ll + INT{ < lO-LENiNfl*) )»l7-3) > jTX»--ai30" 
3730 TP3aTX*+TY*+" "+3I2E2«+Nfl» 
3740 T»(9)=TP«+TE« 

3750 TSdOl^^aieO 1866 "+SIZE2<^*"nT PLAV^-TE'I 
3760 TX*^'' 1530" s TY»«STn* ( 1660+INT ( ( 10-LEN (Nfl«) ) ♦IE) ) 
3770 T«<ll)=rxS+rY*+- -+S12E1*+Nft«+TE* 
3780 IF B^^-M- THEN 3810 

3790 T*(12)«-1460 1550 "+SIZEIS+''Men"+TEe 
3600 GOTO 3820 

3810 T*< 12)=" 1^*60 1550 ••+SIZEl*+''Woman"+Te* 

3820 IF SO 3 THEN 3970 

3830 REM VinSO NOME 

3840 T*(l)=-12aO 1 "+SIZE2«+"THe" 

3850 REM IN LOVE 

3860 TY*=STn«<18ai+INT(n0H-EN<Nfl*>)»I7.3>>iTX*i--113O-- 
3870 Tl-«=TX«+TY^+"»»-+Sl2E2«+Wft» 
3880 r'P(7)«TL*+TE* 

3830 T*<8)=«-11B0 1876 -+31 2E2S+"IN LDVE*+TE» 
3900 RBI RT PLOY 

3910 Tyt=STn*<18il+INTC(10-UENIN0»>)»17.3)> lTX*-"2130- 
3920 TP»=sTX»+TY*+" -+SIZE2$+Nfl» 
3930 T« <9»=TP«+TE» 

3940 T*<10>=-2180 1866 ''+SIZE2»+"ftT PLflY"'^TE* 

3950 TX*«" 1470" »TY*=STn* < 1770+ INT < < I0-LEN tNfl») >»ia) ) 

3960 T*<11>=TX*+TY»-*-- «+SI ZE1*+Nfl*+TE> 

3370 IF SO 10 THEN 4120 

3380 REM LIBRn NftME 

3390 T*(l)="12a5 1 "+SIZEa*+"THE- 

4000 REM IN LOVE 

4010 TY»=STR*(iai3+INT( <10-i^(Nfi») )*17.3)) iTX***" 1 140" 
402O TU*=TX«+TY«+" "+SIZE2*-HMfl9 
4030 T»<7)=TL*+-TE* 

404O T«(a)=»"1190 1868 -+SIZE2»+"IN LDVE"+TE« 
4050 REM AT PLAY 

4060 TY1i=STRS(1811+INT((10-LEN(Nfl*))»l7.3>) iTX»-"ai30- 
407O TP*aTX$+TY«+- '•+SIZE2*+Nfl» 
4080 T*(9)"TP*+TE* 

4090 't*(10)=-2180 1866 "+SIZEa»*"RT PLflY'^+TE* 

41O0 TXS=»" 1500" sTY»=STR« 1 15g0*-INT< ( 10-LEN (Nfl«) ) ♦la) ) 

4110 T*(11)=TX*+TY«+- '•+SIZE1*+Nfl«+TE«- 

4ia0 IF soil THEN 4260 

4130 REM SCORPIO NOME 

4140 T«(i>=-ia35 9 '•+9IZE2»+''THE" 

4150 REM IN LOVE 

4160 TY«=STR«(1811+1NT( (10-LEN<Nft» )»17.3)> tTXft-"1143" 
4170 TL*«TX«+TY»+" «+SIZE2«+Nfl* 
4180 T«<7>=TL*+TE* 

4190 T*(8>="1195 1866 '•+SrZEa»-^-IN LOVE"-i-TE» 
42O0 REJI AT PLAY 

4210 1 Y««STR* ( 181 1 + INT ( ( 10-LEN (NO*) > ♦17. 3) > |TX>*'*2130*^ 
4220 TP*=sTX»+TY*ti+" ••-•.SIZE2*+NA» 
A230 T*t9)=TP'M"TE* 

4240 T«(10)=»"aiO0 1866 -+SIZEa'>+"flT PLflY«+TE» • 

4250 T*(li)='*1470 1570 -+SIZE2»-H4AM»+TE« 

4260 IF SO 12 THEN 4410 

4270 REM SAB, NAME 

ftaeo T«(l)«"1250 19 ''+SIZEa»+"THE" 

4290 RQI IN LOVE 

4300 TY«6=STRe (181 l+INT ( ( lO-LEN (Nfl»> ) ♦IT- 5) ) J TX»=»" 1 170" 
A3 10 TL«=TX«+TY»H " «'+SIZE2«+Nft* 
4320 T«(7>=TL't-»-TE« 

4330 r$CB)=""t2a0 ■+sizea*+"iN love"»-te* 
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4360 rP«=TX«+TY»+" "^►SIZEat+Nfl* 
4370 T4(3)=TP*+TE« 

4380 T«(lO>=-Sia0 1866 "4^IZE2*+"RT P»-PY"+Tet 

4330 TX*=»"1470"»TY*=5TR*(1370+INT((10-LEN{NA»))*12)> 

4400 T«(11>=TX*4.TY*+" "+BIZE1*+N«t+TE» 

4410 COMMON n*,B$,C*,D$,e*,F5,e»,H*, 14, J» 

4420 COMMON SPl*, SPH*. SC1», NO», Nfl*, NAM* 

4430 COMMON Ffl*, EY», I IP«, BE», GL« 

4440 COMMON S IBN«, S, SP, U ( ) , T$ ( ) , 6, H 

4450 CHAIN- SEflN2" 
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4490 
4500 
4310 
4520 
4330 
4S40 
4550 
45&0 
4570 
4580 
4530 
4600 
4610 
4620 
4630 
4640 
4650 
1C60 
4670 
^•680 
4690 
4700 
4710 
47£0 
4730 
4740 
47S0 
4760 
-►770 
4780 
4790 
4800 
4810 
i8S0 
4830 
1840 
4850 
>O&0 
4870 
4880 
4B90 
4900 
4910 
4920 
4930 
4940 
4950 
4960 
4970 
4980 
4990 
5000 
5010 
5020 
5030 
5040 
5050 
3060 
t;070 
5005? 



^ N0«»"CFBL6" THEN PN=1 1 BN=»1 iSN«l 
IF NO*="CFOLe" THEN PN«eiBN=2:SN=»2 
IF NO!B-"CFWLB" THEN PN=2:BN=2l9r4»S 
IF NO»="CNBLB- THEN PNa3 s BN=3tSN«l 
IF HO*""CMOLG* THEN PN=4j BN=»4 »SN-3 
IF NOU^-CMWLO" THEN PN=»4 S BM=4 1 SH«3 
IF NU't-^nFOLB- THEN PN=S t BM=3 1 SN»4 
IP N0»=»"flFDL6" THEN PN=^« BN«6i5N»S 
IF NOt="nFWl-B- THEN PN=68 BN«6:SN»S 
IF NO*="FlMBLO" THEN PN-7 s BN=«7 J SN«6 
IF NOa^-nNOLG** THEN PN=*a : BNoB : SN^7 
IF NO»="flMWL6" THETi PM=B i BN^S 5 SM=7 
IF NU-tsHTFDLB" THEN PN=1 s BN=SsSN=4 
IF ND»=»"TFOUG" THEN PN=2 » BN«6 J SN=3 
IF NUT.="rFWUB" THEN PN=2iBN=6j5N«=3 ' 
IF NO*="TMBLS"'*rHEN PN=3 : BN=9 s SN=6 
IF Nnt-''TWaLQ" TIfEN PN«4 : BN=»10sSN=7 
IF MO*""TMWLG** THEN PN=4 tBW=10»SNsa7 
IF MO!S="CFPMO" THEN PN=»9iBN=l 1 :SN«8 • 
IF WOt="CFOMD" THEN PN^lOi BN«1S jSN=»9 
IF WP="CFHND- THEN PN:=J0! BN=»12s SN=»9 
IF Naii="CMDWD" THEN PN=1 1 * BN=13sSN=8 
IF NOT='*CMUMD" THEN pr4=12 tBN=l4 sSN»10 
IF NOt=*XMWMD- THEN PN=12 1 BN=14:SN=»10 
IF rm=**OFDMO" THEN PN=13j BHs-lSs 5N=1 1 
IF NO-B^^flFOMD" THEN PN=14sBN=st6sSN»l2 
IF NO'F«"nFWMD- THEN PN«1 4 sBN=16s SN-12 
IF NOt«"nJ1BMO" THEN PN=lStBN«l7xSN=13 
IF NOt-"0MOMD" THEN PN«16 5BN=18 » SN«14 
IF Nat:-^"OMWMD" THEN PN«16 : Pr4=iasSN»l4 
[K NO'S="TFBMD" THEN PN=9s BN=15: SNol 1 
IF NO«»"TFOMD- THEN PN=10:BN=16:SN=»12 
IF MOT=»"1FWMO" THEN PN=10 : BN=»16 iSN«12 
11" MO'P=''TMBMD" THEN PN=l I « BN^19 : SN=»13 



IH flO-S^" rWOND* 



^, . THEN PN=12lBr4=20i5Nal4 

i\- MO*=*-TltWMD" THEN PN=> 1 2 1 BN=20 : SN= 1 4 
IF N01i-^"CFBSM- THEN PN^17 s BN=21 :SN«15 
IF riO'S="CFOSM" THEN PN=iatBN=225SN=-l6 
IF NO$="CFWSM" THEN PN^IS jBN=225SN=»16 
IF NOa^^CMBSM" THEN PN»ig i BN=23iSN=»13 
U- Ht1'5=''CM0SM'* THEN PN=20sBN=»24iSN«17 
IF NO$="CMWSM'' THET^ PN=20 5Br>t=24»SN=l7 
IF Nn!5="RrBSM" THEN PN»21 : BN=s25 8 8N«ia 
IF M0«="0FOSM" THEN PN=22: BN=26s SN=il9 
IF Mnt="nFWSM" THEN PN=22 : BN=26 sSN»19 
IF M01i="fiMDSM" THEN PN=23 : BN=27 1 SN=20 
IF NOt="fn»IOSM- THEN PN=24 : BN='2B sSN=21 
IF NOS=»"PMWSM" THEN PN=24: BN=2B»SN=»2l 
IF N01;a"TFPSM" THEN PN=s 17 sBN=25iSN=» 18 
IF NOt="TFOSM- THEN PN=22: BN=26iSNal9 
IF WOlia^TFWSM" THEN PN=22sBN=26«SN-19 
IIT HO$="niBSM" THEN PN=» 1 9 1 BN=27 : BN-20 
IF M0*="TMOSM" THEN PN=245 BN=»29:SN«21 
IF NO»=-TMWSM" THEN Pr4=24 1 BN=29sSN-ai 
REM 

IF EY$="CFB" THEN PE=* 1 s BE=1 x SE=13 
IF EY<Ba"CFO- THEN PE=»2:BE=2sSE«2 
IF FYt!=-CFW- THEN PE=3 s BE=3 1 SE^ 1 
IF EY«="CMB- THEN Pe=4iBE=4:SE«14 
IF EY*="CMn- THEN PE^Sj BE=S:SE«4 
PE=6-!nt^-f^rSE-3 



In ey«="CmIj 
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51 IC 
31E0 
5130 
3140 
51S0 
S16Q 
5170 
3100 
5130 
5200 
5210 
5220 
5230 
5240 
5250 
5260 
5270 
5280 
5230 
5300 
5310 

S330 
5340 
5330 
5360 
5370 
5380 
3330 
5400 
5410 
5420 
5430 
5440 
5450 
5460 
5470 
5480 
5490 
5500 
5510 
5520 
5530 
5540 
5550 
5560 
5570 
5580 
5530 
S600 
5610 
5620 
5630 
5640 
5650 
5660 
5670 
5600 
5630 
5700 
5710 
5720 
5730 
5740 
375© 
576Q> 



IF EY^^^TPB 
IF EYSa^TFO 
IF EVP^^-TPW 
IF EY»=-TMB 



tF EY$e«piFW- nitN l?E=3xBt»y:SE»7 
tF"EY«=!"OMB° THEN PF- t0»BE«10:BE-«a 
IF EY*a-nMO" THEN P.- ' 1 »BE=»12iSE»9 
IF EY*=-RMW" THEW PE=128BE»13:SE»10 
THEN PE=13=BE=»7fSE-3 
THEN PE=8sBE=»eiSE=»6 
THEN PE=14tE^=14iSE-11 

THEN PE=»l0jBE-l0:SE»a 

IF EY*»"TMO" THEN PE=5tBeal3 iSE«9 
IF EYSa"TMW" THEN PE»lSiBE«l6iSE-ia 
REM 

IF FO*="CFBT" THEN PF=1 »BF=1 J SF-l 
IP FR^^'-CFBF" THEN PF=2 s BF=2 : SF«»2 
IF Fn»="CFBfl" THEN PF-S s BF=3 5 SF»3 
IF FP^^-CMBr** THEN PF»4 : BF«4 : SF«4 
IP rO'5="CHBF" THEN PF=»5 » BF=»S : SF=-S 
IF Fft4=»"CMBn" rHEI>l PFo6tBF=6*SF=«6 
IF Fn^P^-flFBT- THEN PF=7 s BF=7 1 SF-7 
IF Ff«="HFBrr, THEN PF'sS : BF»8 1 SF«e 
IF Fnt^'-nFBn- THIEN PF=3:BF=3sSF«3 
IF Ffl«="ni*lBT" THEN PF=105Bral0tSF«I3 
IF rn?="nMBF- then PF=11 sBF=lI:SF=ie 
IF rO»=«"nmBO" THEN PF=»12tBF=l2:SF«20 
IF rn'5="TFBT- THEN PF=«7s BF«7i SF«7 
IF FOS=="TFBF*' THEN PF=e:BF«asSF=a 
IF rn5="TFBfi'* THEN PF'»3sBr«9xSF«17 
IF FP*="TMBT* THEN PF=»10 :BF«l0t8F«10 
ir rnii=*'TMBF- then PF=*11sBF=11:SF-11 
IF Fn-t^-TMBR- THEN PF«12*BF«ie»SF-l6 
IF FO«=»**CFOT" THEN PF=l3:BF=l3f SF=»l 
IF Fn!S="CFaF" THEN PF=14sBF«l4;SF-2 
IF FP-S^-CFOn- THEN PFal5:BF=15*SF=-3 
IF Fn$«"CMOT" THEM PF-168BF=16 ttSF«4 
IF Ffl$="CMOF- THEN PF«17 jBF«17iBF«5 
IF FP«="CMOn" THEN PF=t8sBFal8»SF«6 
IF Fn$="PFaT*' THEN PF=13:BF=»i3sSF-13 
IF FPt^-PFOF" THEN PF=eOs BF=20sSFal4 
IF FO»="PFafl" THEN PF=21 »BF=21 rSF»13 
IF FO«="nMOT" THEN PF=a2f BF=22sSF-lO 
IF FR*&="PttOF** THEN PF=s23iBF=23sSF«ll 
IF FPS=-flMOP" THEN PF=24iBF=24sSF«l2 
IF Fnii="TFOT" THEN PF=13«BF«l9iSF«13 
IF FP^^'-TFOF- THEN PF=20sBF=20:SF«l4 
IF Fmt^-TFOPl" THEN PFa25:BF=21 8BF-17 
IF FP^s-TMUT" THEN PF=22»BF«22*SF-10 
IF FfiS=»"TMOF*' T^rEN PF=23:BF=238SF-1 1 
IF Fn*="TMOn'* THEN PF=26 1 BFa24 sSF-lS 
IF Fn*==-CFWT- THEN PFs^t 3jBF=I3xSF"1 
IF FOT-^CFVIF** THEN PF=l4iBF=14sSF»2 
IF Fn*="CFWa" THEN Pr=Jl5 = BF=»15:SF«3 
IF Fn$="CMWT" THEN PF»16»BF=16iSF^ 
IF Fn'P=-CrwF'* THE^^ PFal7:BF»l7:SF«»5 ^ 
IF FP^^-CMl^n" THEN PF^ 18 iBF«iasSF«6 
IF Fn*="RFtiT- THEN PF=l3iBF«t3iSF=»13 
IF Fn«="ftFWF" THEN PF=20 iBF=20 :SF"14 
IF Fn«="nFWfl" THEfJ PF=21 :BFc21iBFi*15 
IF Fn»="RMWT" THEN PF=«22:BF=22tSF»10 
IF Fn*='*nMWF" THEN PF=23rBF«23sSF=»H 
IF FP^s^-OMWO" THEN PF=24lBF««24tSF-l2 
IF Fns^^TFMT" THEM PF= 13 J BF=l3sSF-13 
IF Fn»="TFWF" THEN PF=20iBF=20:SF«14 
IF FP4="TFWft" THEN PF=25iBF=21 :SF-17 
IF FR«="TMWT" THEN PF=22:BF«»22tSF"l0 
IF rR*=="TWWF" THEN PF=23 JBF=23»SF«1 1 
IP fA«=-"Tt1VI7l» THEN PF=26ieF*2^-SFct6 

REM 
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.S770 IF I*="N" THEN 5980: REM SKIP OVER SL CHECH 
5780 REM 

5799 IF GL«=-CFB" THEN PB»1 jBS*! :SG«1 

5800 IF GL$="CFO- THEN PQ=2 iBG=4sSG-l 
5810 IF BL1i="C™- THEN PG»1 :BG«4 :S6=»1 
5820 IF GL«a"CMB- THEN PQ=3;BG^:S0=l 
5830 IF GLJo-CMO" THEN PG«2 : BG=4 s SG» 1 
5840 IF 6L«=-CMW- THEN PG=33BB=»4jSD=1 
5850 IF GL*«-flFB* THEN PG»4 : BG=2 i SB»a 
5860 IF eL*»"RFO- THEN PG«S I BC=3 : 88-2 
5870 IF GLSs-PFW- THEN PtJ^ tBG"6sSG«2 

* 5800 IF GL««"fiMB- THEN PG=6iBB=a3:SQ«3 
5893 IF SL$="PMO" THEN PG=»7 1 Be*»7 : SB«3 
S300 IF 6l.»=»"RMW THEN PQ=6iB6=a :Sa»3 
5910 IF GL««"TFB- THEN P6=8 » BQ«9 J 36^2 
S920 IF QL»=s"TFO** THEN P6o9sBB=al0i9B«2 
5930 IF 6L»a-TFW- THEN P6=»8 : B6= 1 1 : SB-2 
5940 IF GU*="TMB" THEN P6« I 0 I BS»3 t SG»3 
5950 IF eL«="TWO- THEN PG=»1 1 x B0=>12rSS«3 
5960 IF Gl.««-TmW* THEN PG=»l2l B8=»138 3Q«*3 
' 5970 REM 

5900 IF G»="NN- THEN 6360»REM SKIP OVER CHECK 
5990 REM 

6Q00 IF BE»«-flMBLFB" THEN PB-l J BB»1 sSB«l 

6010 IF BESa-OMBUGG" THEN PB«2iBB»2sS8«9 

6020 IF DE!i;="nmBLrtS- then PB=»3sBB«4»SB=»3 

6030 IF B£*«-flMBDFB* THEN PB=^ s BB=»7 : SB«2 

S0^9' IF BE«=-fiMBDGQ- THEN PB»7iBB»2:SB=^9 * 

6050 IF BE«=-PMBDMS" THEN PB=»3 : 83-4 1 SB-3 

6060 IF BESa" TMBLFB" THEM PB«1 5BB«2sSB»l 

6070 IF BE««"TWDLSG** THEN PB»2 » BB«2 iSB»9 

6080 IF BESs-TMBLMS- THEN PBi»3iBB«A tSB»4 

6090 IF BESs^TMBOFB- THEN PB=»6 s BB«2 : SB«2 

6100 IF BE*"" TMBDGG" TH^N PB=»7 tBB«asSB»9 

6110 IF BEf -TMBOMS" T>4EN PBa3 : BB»4 1 BB»4 

6120 IF BElia-PMOLFB* THEN PB=10J B8»3:SB»7 

6130 IF BE^-^PMOUGO- THEN PB:»10« BB«3 :aB»7 

6140 IF PE*="flMOU«S* THEN PB«8:B3=»6s9B»e 

6130 IF BE!»«-flMO0FB- THEN PB=9:B8»3sSB»7 

6160. IF DE*=»-flMODGB- THEN PB=98 BBa3:SB«7 

6170 IF BE*="RM0DM3" THEN PB=a t BB«6 : SB'=»8 

6180 IF BEia-TMOLFB" THEN PB«95 BB«3iSiW 

6190 IF BE«=*'TMOLGB'* THEN PB=9 : BB33sSB»7 

5200 IF BEt=" TMOLMS- THEN PB«S:BB=6:SB«S 

6210 IF BE*=-TMODFB" THEN PB«9 tDB=»3sSB»7 

6220 IF BE^a^TWODGG- THEN PB«9 » DB-3 : SB«7 

6230 IF BESs^TMOUMS" THEN PB-B i BB»6 s S8«8 

6240 IF BE*«"ftMWLFB'' THEN PB«l :BB»1 iSB-l 

6250 IF BE«=»-flMWLGG- THEN PB«2 1 BB«2 ; SB-9 

6260 IF Be*="flMWLrtS- THEN PB=4 s BB«3 J SB-S 

6270 IF BE»=-PMWDFB- THEN PB-B J BB«7 s SB«^ 

6280 IF DET«"flMWOGQ" THEN PB=*7tBB=2sSB»9 

6290 IF BE!D=-ftMWDMS- THEN PB=»S 1 88=8 » SB»6 ' 

6300 IF BEV^^TMWLFB" THEN PB=1 :BB=»2iSB*9 

6310 IF BE«=-TMWLG9" THET^ PB=2 ; BB=2 1 SB-9 

6320 IF BE«=»** TMWLMS- THEN PB=3 s 88^4.1 S8-4 

6330 IF BE4="TMWDFB" THEN P8«6 s BB=2 t SB-9 

6340 IF BE^^-TMWDQS" THEN PBa7iBB=^sSB«9 

6350 IF BE»&=*"TKWDMS* THEN PB^S s BB=»4 : SB»4" 

6360 IF C$=»-B- THEN PF$ (6) =-PBMl iREM DROM PFRO 

6370 IF C«=-B- PND BSa"F- THEN PF* C7)«»'PEPRi REM EARING 

6380 IF CCSa-M- THEN PF» (8) =»"PMTl x REM MPRTIAN 

6390 COMMON D C> , fi«, B», C«, D*, E», F*, 0», H-S, I J* 

6400 COMMON SP1«, SP2«, SC1», N0«, Fft», PG, BS, SG, PB, BB, SB 
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64?ia -COMMON srGN*,S,T«<),PF»(),BF*(),SF»(),6,H,PF,«»F,SF 
6430 CHAIN"SEflN3" 
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6450 




6460 IF HnS="CFCn.STBD- THEN BH=*13:SH«U-i 
6470 IF Hfi^^-CFODSTBD- THEN BH»13jSH=>13 
6480 IF l-IO!ti="CFOLSTB8- THEN BH«13:SH»13 
6490 IF Hfl«=»-CFODSTBB- THEN BH=»l3sSH=l3 
6300 IF Hn$="CF0L5TCn- THEN BH*13aSH-Z3 
6310 IF HO»==-CFODSTCR- THEN BH«l3iSH=>13 
6520 IF H««»"CFOLSTSS- THEN BH«13sSH«13 
6330 IF Hft*=»"CFODSrSB" THEN BH=»14|SH»14 
6540 IF H0*=»-r:FOLSTME" THEN BH=»iSsSH»15 
6550 IF H«*="CFODSTME- THEN 8H=l6:SH«t6 
6560 IF Hn*»"CFOLSTUL- THEN BH=*17tSH-17 
6570 IF Hflt^-CFOUSTLL- THEN BH=ia»SH=ilB 
6530 IF HOtB^-CFOUWBBD" THEN BH='195SH-ig 
6S90 IF Mfi*=»"CFODWBPD" T>IEN BH=20iSH=»l3 
6600 IF Mfl*="CFOLWBBG" THEN BH»19»SM«I9 
6610 IF Hn!B=*-CF0DWDB8- THEN BH=205SM=>19 
66S0 IF linit="CFOLWBCn'* THEN BH=19!SH»19 
6630 IF Hn«»-CFaDWBCR" THEN BH=20jBH=-19 
6640 IF Mn«=-CFOLWDSS« THEN BH=»19f SH=nl9 
6650 IF Hn»="CFODWBSS" THEN BH«20*SH=a20 
6G60 IF Hn-P^-CFOLWBME** THEN BH=ai :SH»21 
6670 IF HO«=-CFQDWBME" THEN BH=22sSH»a2 
6680 IF HAt^-CFOLWBLL" THEN BH=23fSH=a3 
6690 IF Hn»="CFODWeLL" THEN BH=24iSH==24 
5700 IF HR5:="CFOLFZBD" THEN BH«25sSH-a5 
6710 IF H04=»"CFaOFZBl>- THEN BH=26iSH«aS 
t,720 IF nn$="CFOLFZBG" THEN BH=a55SH«23 
6730 IF Hfi«="CFaDFZBG" THEN BH=26sSHa2S 
6740 IF linSi^-CFOLFZCR- THEN BH=*23 : SH=i2S 
6750 IF HOtS="CFODFZCn" THEN BH=26«SH«23 
6760 IF Hai»«"CFOLFZSS" THEN BH=>25 s SH=«25 
6770 IF Hft«="CFODFZSS*' THEN BH«26sSH-2S 
6780 IF nfi<="CFOLFZME^ THEN BH=27tBfl«27 
6790 IF HfitP="CFODFZME- THEN BH=20sSH«28 
6800 IF H0*="CFOLFZLL'* THEN BH=«29sSH-29 
6810 IF Hft«=»"CFODFZUL" THEN BH=30sSH«30 
6020 IF Hn-fr^^CFOLWVBD" THEN BH=»I9sSH«l9 
6830 IF Hn-t="CFQDWVBD- THEN BH=*20:SH=il9 
6840 IF Ha*=:"CFDLWVBG" THEN BH=19:SH=19 
6850 IF Hnt=«CFODWVBG" THEN BH=20iSH=19 
6860 IF nnT-"CFOLWVCn'' THEN BH^^ig :SH=-19 
6870 IF H0*»"CFODWVCn" THEN BH»a0sSH»19 
6880 IF HniJ="CFOLWVBS- THEN BH-»19:5H-»19 
6890 IF Hftt="CFDDWVSS" THEN BH=20:SH»2O 
6900 IF Hnt«"i:FOLHVME" THEN BH«21:SH«21 
6910 IF nn^^^CFOOUVME" THEN DH=>22 sSH=»22 
6920 ir Hnt="CFOLUVUL" THEN BH=23:SH«23 
6930 IF nP»="CFODW^L" THEN PH=24sSH=24 
6940 ir nn*-^"CFOLCYBD- THEN BH«'25sSH«25 
6950 IF Hn«=»"rFODCYPD- TIfEN BH=26iSH='23 
6960 IF H0'P="CFOLCYBG- THEN BH--=23 « SH=23 
6970 IF H«t="CFODCYBG- THEN BH=26iSH-23 
6980 IF HO*>="CFOLCYCn- ThfEN BH=»25 s SH=»25 
6990 IF H09='*CF0DCYCn" THEN BH»26:SH«23 
7000 ir nO'P="CFOLCYSS- THEN BH=«3:3H-23 
7010 IF HO*=-CFODCYSS" THOJ BH=»26:SH=2& 
7020 IF HOt="CFOLCYME" THEN BII=27:BH»27 
7030 IF M01i=-CF0DCYME" THEN BH=2BjSH=28 
7040 IF HO*=-CFaLCYLL" THEN BH=29fSH='29 
7050 IF HP«="CFODCYLL" THEN BH=30 8 511=30 
7060 IF Mnit="CFOLPFPD" THEN BH=«1 1 : 51 1=1 1 
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708e IF 

71O0 IF 

7110 IF 

7120 IF 

713© IF 

7140 IF 

7150 IF 

7160 IF 

7170 IF 

7180 rr 
719-3 ir 
7&«10 IF 
7210 IF 

7229 IP 

7230 IF 
72^10 IF 
7250 IF 
7260 IF 
7270 IF 
7280 ir 
7230 IF 
7300 ir 
7310 IF 
7320 IF 
7330 IF 
7340 ir 
7350 ir 
7360 IF 
7370 IF 
7330 IF 
7390 IF 
7A00 IF 
7A10 IF 
7420 IF 
7430 IF 
7440 IF 
7450 IF 
7460 ir 
7470 IF 
7400 IF 
7430 IF 
7500 IF 
7510 IF 
75G0 IF 
7530 IF 
7540 IF 
7550 IF 
75G0 IF 
7570 IF 
75Q0 IF 
TS*?© IF 

7600 ir 

7B10 IF 
7C20 ir 
7630 IF 
7640 IF 
7650 IF 
7660 IF 
7670 IF 
7680 IF 
7630 IF 
7700 IF 
7710 IF 
7720 IF 
773C JF 



HP*="CFO0ftP8Q*' THEM 
HPta-nFOLOFCR* THEN 
HO«="CFaDRFCn" THEN 
HP*«"CFOLttFSS" THEN 
Hns^^CFODPFSS" THEN 
HqSs-CFOLnPME*' THEN 
im="CFO0PFME** THEN 
HR*='-CFOLnFU.- THEN 
HOi^-CFODPFLL- THEN 
|iP*.-s-i:MOLfeTPD" THEN 
HPS='*a*»ODSrBD" THEN 
Hn4="CWOLSTRG- THEN 
HO*="CMODSTBG- THEN 
Hf45="CHOUSTCn- THETJ 
Hi^S^-CKODSTCn- THEN 
Hnt^-CMOLSTSS- THEN 
HP4="CMOD3TSS" THEN 

iior$="r;MOLSimE" then 

nn«="CMODS*tME" THEN 
Hn*="d*IDLSrLL" THEN 
HPt="CMODSTU.- THEN 

iin*="i:wai-WDBO* then 

l^n^S^s^CNODUBBD" THEN 

HP*-"CMOUWFiPe" THEN 

HPS»"CMODWBB0" THEI4 

Mn'S-«i;MOLWBCR" "THEN 

HP«=-CMO0wncn- then 

iin-f^^CMOLWDns" then 

HP«-"cwaDWBSS" then 

nn*6^"CMauwDME" then 

HP*="CMODWBME- THEN 
Jtn*=»"f:MOLWBUL* THEN 
HP*-"nMODWDLL" THEN 
nOt:a"CMOLFZBD- THEN 
HP'6=*-CMODF2BD" THEN 
Hn*="nMOLFZBS" THEN 
HR*«"CriODFZBe- THEN 
HOt="CMOLFZCR" THEN 
Hn«="CM0DF2CR" THEN 

iin«="t:MOLFZSS" then 

Hfl»=="CNODFZSS" THEN 
Hn«="CMOLJ=^ZME" THEN 
HttSa-CMODFZWE" THEN 
HttS^-CMOLFZLL- THEN 
HP*=»"CMODFZLL" THEN 
HP*=^"nMaLWVPO** THEN 
Hn«=i"CNOOUVDD** THEN 
Hn«="t:MOLHVDG- THEN 
HP*="CMOOWVBQ" THEN 

Hn*="CMOuwvcn- then 

HP«="CMODWVCR" THEM 
Hn«="CMOUWVSS- THEN 
HP«="CMODWVSS" THEN 
HO$="CMOLWVME" THEN 
Hrt^s-CMODWVME" THEN 
HPS«"CMaLWVLL" THEN 
HP'»="CMODWVl.U" THEN 
MP&="CMQUCYBD" THEN 
HP*=-CMODCYBD" THEN 
Hn'P=i"CMOLCVBG- THEN 
HP*=5«CMaDCYBG" THEN 
HPS«-a40LCYCR" THEN 
Hn$="CMaDCYCR'' THEN 
HP*="atOLCYSS- THEN 



Hft*«"CMOOCYSS'' THEN 



BH=ll:SH»J I 
BH^l2jSH=»ie 
BH=»llsSH»Il 
BH=»I2tSH=«12 
BH=llsSf*»ll . 
BH=-12iSH-12 
BHall«SH»tl 
Bfr=12sSH«ia 
BH«a2sSH=7^. 
BH'=82iSH«79 
BH=a2sSH»79 
BH=*e2:SH«73 
BH=^2rSH=79 
BH=82:SH»79 
BH=»a3»SH=«73 
BH=»8AiSH=*74 
BH=85»SH=«73' - 
BH=B6:SH«76 
BH«87sSH=»77 
BH=8a:SH«7a 
BH»97!SH=7g 
BH=37igH»79 
BH=37iSH*79 
BH=g7iSH«79 
BH=a2sSH=»79 
BH=B2sSH«73 
BH=*37:SH»67 
BH»9asSH^a 
BH«33sSH=^9 
BH=»100iSH=«70 
BH=101«SH-71 
BH=102xSH«72 
BH^2 1 SH=»79 
BH=a2sSH<*79 
BH=82 I SH=79 
BH=82iSH=79 
BH=sa2s5H«7^ 
BH=82iSH=»79 
BH=91:5H=e0 
BH=»92iSH=ai 
BH=93jSH«82 
nH=94iSH=83 
BH=95:SH-84 
BH=5g6iSH=a5 
BH=97:SH-79 
BH=97sSH?»79 
BH==97s5H»79 ' 
8H=975SH=»7g 
BH«82:SH«-79 
BH^2sSH=»79 
BH=»97sSH«67 

BH^asBH^ea 
BH^ggrSH'-eg 

BH»10Os5Ha70 
BH«101:SH»71 
BH=L02:SH«72 
BH=a2sSH=»79 
BH=e2jSH»79 
BH=a2:SH«79 
BH=a2rSHa79 
BH=a2sSH=«79 
BH=82:SH»79 
BH=9l5SH«a0 
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7740 XP 

TTJw? xr 

77GO ir 
77713 ir 
7700 ir 
7790 IF 

7a«o I r 
7010 tr 

7820 IF 
703<? II- 
70^0 IF 
7050 IF 
7OB0 ir 
7f?7»?t IF 
7RP<?* IF 
7n-?0 IF 

7gpo ir 

73ir» IF 

79^*3 If 

7930 IF 

73 'II? ir 

7T.5'^ IF 

736'''» IF 

7370 IF 

7?0^ IF 

7990 IF 

fl^iOT 1 f ' 

nPH© IF 

ir 

B0^O IF 

60^0 ir 
etjgo IF 

8C*60 I F 

e'37*> IF 

8^30 IF 

8*^9^? IF 

8H?>Ct ir 

81 10 IF 

01c© IF 

8130 IF 

81'i?» IF 

013*? IF 

OH>0 IF 

6170 IF 

01f*0 IF 

P190 IF 

OSO'P IF 

OSIO IF 

B??^» IF 

82. ^f> IF 
8J?'»0 IF 

e^C":"* IF 

or;7*?t IF 

8?(!fl* IF 
029^ IF 
030*^ IF 
83t(? IF 
03£«9 IF 

83. ^0 IF 
83'i«^ IF 
nSZ'O IF 
83€»*? IF 
8379 IF 

6390 



im-"t;MrjLnrni>" then 
nnit^-CHOix^Fno" imen 
irn*^"i:HUi.nFBB" tmeh 
HO? ^"t:iiODnFnu*' n iei i 

I tf " CI'IOLOFC n • Tl IRM 

nf»«="CMUDnFcn" tiihii 

I inT^-CMOLnFRS" Tl lEM 
HO*-' " CWOUnFBS " Tl rF.M 

\\f\r^" cMOLnr we - 1 1 iei i 
Mnit-="nwunnFME" ihhn 

I |n-!:="CMOi .nrLL" Tl lEH 
lint-t'TIWlOnFLL- THE! I 

iin-nrr-oFcn.Binu- rinrri 
I in-srt -nr tjos I pi>" i » tFi*' 
iiof^^nrui-SiPR*' friEH 
nnt«"nFonsrBU" luEri 

irnf— fll'DLniCR- IHEH 

irn*-="nFOi)Bicn** imfn 

iintirr'Tw-ni-RiR'?'' niEN 

nn-«-"oroosiss'* iiifn 

iinT.-"nFoi.niME** iMEri 

||fl'?-"nrUI?DIHE" 11 IE! I 
I ini:«"f>EOnS I l.l." 1 1 lEM 

iii>f-^"nrriLiipni>- imem 

I if>-fc--nn)i-WBne'' 1 1 iem 
iint-'*'nFOiHtDnG** ti:em 
itn*?--nFOi.Mrtr:n" iiie?»i 
iin-:-"nroiMinf;n" tmeh 
iin-s-'virouioas** iiiEri 
iini:^"nFr.»Diictss'* them 
nnt^'^firoi i-iphp." imen 
iint-"nrom-JDME" then 
iin'S-'Tiruumi-L- r»iEM 

nn-pJ-'TtFOUUDLL" IMFN 
jm-'"f)FfJLF7DD*' IMEW 
Hn-p=»"nFODFZP0- VliEH 

im«"nrai.r7Pa'' tiiem 

unr-t'TiFODFZBB" THEN 

nnt.-."nr(jiTZCir TiiEri 

iin-^r^^nrauFZCFi" then 

iintr^-nFni.FZRn- tiiem 

iim.rr"nroi)FZss;" tuei4 

Hn*-="nFULF7HE- TMEN 
Mn-!i="nFCM>rZME" ihen 

j!ni^="nFr»Lr7LL'' then 
nni!-"n»"unFZi,L" then 

I If^-S^^nFULWVPD" 1 HEN 

i(n*ii»"nrui>wvF»i)- then 

Hn*-="nFOLHVPr9- THEM 

Hn«'> - ni "onin/BB " ti iei i 

nnt=-»"nFnLWvcrt" then 

Hni:'''nrouwvr;R" then 

Hn-r^-nruu/vps" then 

Hn'>i='-nFoovivs5" then 

Hni:= -nFlH.WVME" THEN 
Hni:-'"nFOI)HVI'lt^" THEN 
Hn*t:-"nFOLWI.L- THEM 

HnT-"nFom-rA.L" then 
1 in*--nFfn nvpi)** Tiirri 

H/4=*'AFCCYBD" "THEM 



W N9A:SH«G3 
BH=»9?jtSH^e I 
PI l=g6:SH=P3 
PH^ll :SH«1 1 
PI |al2:SH'«ia 
mMll:SH^I I 

CI i=ia:sii-'ia 

BH»11 sSH^l I 
pi|al2iSH»l2 
BH=lisSlt«l 1 

BII:«tl:SII-=ll 
pll=ias8H«l2 
PI 1^=11 :SM-11 
pil-lSiFlNia 

fj!h>9^snn-n5 
nil^OsRi l-flR. 
BH-^lCi^sSI 1-^07 
01 1^1 95 5 SI i=»Qn 
PH-lWs5?H="79 
01 1-^09 ! Rl l"79 
01 |-tA3 5RI l-''V3 
PH^A'fcsSH-^^f'fc 
Bl l-ASsSH-^S 
01 l^/kGrf!l l^'iS 
pil-A7sn l^'^T 
01 1-^/iB:PM'-AO 
piM90tSI 1^0 S 
nn-»90:SH-96 
Pll^t l3rJ»H*^95 
01 1=) |AiRH-96 
0It-ITO:Plt-*79 
PH-='89sSI l=»79 
BH^'^grPlM? 
0H-5'^«SII=3O 
011^31 JJ?! 1^39 
0H-5S:SH=^'i« 
PH-=53x5H-''il 
PI ir-S^itPH-^^a 
Bl I"9QsBII-™QS 
PH=g0i55ll=»Bf> 
Pll-T'l l3iSH-=H?3 
011=- 1 10 :PH-=10'V 
BII-lC*r>sPH-79 
PII^B9iSII-«79 
PI |"5SiSH-'09 
PI |=^S6sEII'»5« 
PII^57»SII"^Si 
PII-5B:nil'-Sa 
PI H59 s PI h«53 
PI \'==ry0 s SI l--^SA 
011^9*9:31 l^oe 
Bl l"9»9 s 81 1-»06 
PI |-^ll3sSill"93 

01 is-u'itSH-age 

0lNl'?fiiSI l-»79 
pi-|=89fSH=»79 
0M-GUSH^35 
PI |=6atSH"5fi 
PI |>-&32SI 1^57 
BH-6'nRI l=-5Q 
01 1^=65 s SH'-J59 
01 1=66 ?ni 1^6^ 
niNg^l:SII-=n6 
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8439 
8440 
8450 
8460 
8470 
8480 
8430 



6510 
85£0 
6530 
8540 
8550 
8560 
8570 
8580 
8590 
8600 
8610 
8620' 
6630 
8640 
8650 
8660 
8670 
8680 
8630 
8700 
8710 
8720 
8730 
87A0 
875e 
8760 
8770 
8780 
8730 
8800 
8810 
8820 
8830 
8840 
8850 
6860 
8870 
8880 
8830 
8990 
83 lO 
8320 
8330 
6340 
8350 
8360 
8370 
6380 
8330 
9000 
90 lO 
9020 
9030 



IF HA$«"Arc3LCY8e" 

IF Hn»="flFOLCYCR" 
IF Hfl^^^OFODCYCR" 
IF Hn*="nFOLCYSS- 
IF Hfl«=»"flF0DCYS5*' 
IF Hn«»"PFOUCYME" 
IF Hni=»"OFOUCYMe" 
IF Hn*«-RFOLCYLU- 
IF HA«==-PFO0CYU_- 
IF im^^nFOLPFBD" 

IF Mn»="nraLnFBG- 

IF HP^^^OFODOFBS" 

IF Hos^-nFOLnFCR- 

IF HP*="OFODnFCR" 
IP HR$=-PFOL^FSS" 
IF HA^s^^OFODPFSS" 



IF hU15^"nF0LnFWE' 
IF HP«="PFODflFME* 

IF im='"nFOLnFLL" 

IP Hftt="PFODPtfTJL*' 
IP Hnt="PMOLSTBD- 
IF HO^^-PMODSTBD" 
IP mfP==**OMOLSTBB" 
IF Hn^^^nHODSTBQ- 
IP Hn*==-OMOLSTCR- 
IP HP*="fWODSTCn" 
IP Hn*>="nMOLSTSS" 
IP H0*="PMODST3S** 
IP Hn*-"nMOLSTME** 
IF MR»="RMaDSTME" 
IP llfl«s="RMOLSTLU- 
IP H«*="RMODSTLU" 
IP Hn-P=''AMOLWBBD*' 
IP HP^^^nMODUBOO" 
IP Hn'P-"nMOLWBBB*' 
IF Hfl«="PMODWBBG" 
IF im=**nMOLWBCR" 
IP HP*=*'nMOUWBCR" 
IP Hn*="flMaLWBSS" 
IF HP^^^PWODMBSS" 

IP nn«="nMOLMBMe'* 

IP HP-B='*Pt4aDWBM£** 
IF im=»"PHOUWBLL- 
IF HP*=»"RMaDWBLl-" 
IP HFrt="PMOU=^ZBD" 
IP Hn«=»"PMODFZBD** 
IP Hn*»=*'PMOLFZBG" 
IP Hnt="PMODFZBG" 

IP mss-niioLFZCR- 

IP HP«»-PMODFZCR" 
IP HOiB^nMOUFISS" 
IP Hn»="PMODFZSS" 
IP Hn*B="PMOU=^Z«E" 
IF Hn^"PMaDFZME" 
IF Hn*--nMOU="ZLU" 
IF HP*=*-PMODFZLL" 
IF HPfo-PMOLWVBD- 
IF HP««"R>'»ODWVBO" 
IP |in*="PM0UWVB6- 

IF Hn*=-omoDHVBG- 

IP im^^PMDl-WVCR" 
IF HR*="PMODl'r'yCR- 
jp HA*="flHDLWV3S- 



THEN 

TiieM 

THEi« 
THEN 
THEN 
THEM 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
TirET4 

niEfi 

THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
T>^EN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
rHEN 
THEN 
THEN 
THEN 
THEN 
THEN 
' THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THET* 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 



-BHstetsSKsl 05 
BH=»ia2iSH=>l04 
BH=»l06sSH=»79 
BH=89:SH=73 
BH«67jSH«»61 
BH=*6a«SH«62 
.BH=>&9iSH=>63 
BH'370iSH«64 
BH=»7l»SH=63 
BH=»72»SH=«66 
BH»ll »SH«il 
BH=«12tSH="12 
BH=»ll:SH=*ll 
BH=l2iSH«l2 
BH=ll!SH=*ll 
BH=al2sSH=»12 
BH»lliSH«ll 
BH«12«SH«12 
BH=1HSH»11 
BH=«l2sSH:«l2 
BH»11 iSH=ll 
BH»12s5H^12 
BH=103jSH=«86 
BH=103sSH«a6 
eHal04sSH»87 
BH=»l05sSH«88 
BH=«1065SH=»79 
BH=89:SH«7g 
BH=ia7sSH=89 
BH=128:SH»gO 
Bn=»l2g?SH«9l 
BH=l30sSH«92 
BH»l3i:SH="93 
BH=*132sSH«94 
BH=103sBH=^6 
BH=*l03:SH=a5 
BH=ll3i5H»93 
BH=ll'iiSH=96 
BH=106:SH=i79 
BH=^89:St^»7^ 
BH=l33sSH«97 
BH=»l34tSH°98 
0H=*135:SH»99 
BH=>l36iSH=»l0O 
BH=137iBH=>10l 
BH=3l38:SH»102 
BH=103>SH^*86 
BH"103s5H«e6 
BHal21iSH»103 
BH=122«SH«104 
BHol06»SH=79 
BH=a9sSH=79 
BH=rl3gsSH=»103 
BH«140:SH«106 
BH«141sSH=«107 
BH=il42sSH«l0a 
BH=»143!SH=il09 
BH^l44iSH«llO 
BH=103sSH«86 
BH=l03sSH»86 
BH=1135SH»95 
BH=»114«SH=96 
BH=106:§H=«73 
BH=89:SH=73 
BH«=145jSH«111 
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ed5d 

9080 
3090 
9100 
9110 
9120 
9130 
9140 
9130 
9160 
9170 
9160 
^190 
9300 
9S10 
9220 
9230 
9240 
32S0 
9260 
9270 
9230 
9290 
9300 
9310 
9320 
9330 
93A0 
93S0 
9360 
9370 
9360 



rtr irAit:"AllO0WVS5"THeN&H'146--SH-lU 
F Hn5-"WE*-WVME« THEM bH-147: SH- U3 
F Hfl'5:="nMDDWVME" THEN BM=>14aiSH«l 14 
F Hn*=-flMOLWVLL» TM€M BH=149:9H«t 15 
Hfl*='"fiMODWVLL- THEN BH=150iSH»l 16 
HO$=»"OMOLCYBD" THEN BH=103*SH=ti6 
Hft$="fiMODCYBD" T>IEN BH=>103iSH«86 
Hft!6="nM0LCYBS- THEN BH-121 sSH»103 
HO*=*fiM0DCYB8" THEfl BH=»12a*SH-104 
Hns^-nWOLCYCR" THEN BH=>106 :SH«79 
Hn*="RMODCYCR" THEN BH=8gsSH=»79 
HR*»«PMOLCYSS- THEN BH=139sSH-103 
Hft«=»"ftH0DCYS3" THEN BH=»140iSH=»106 
THEN eH=sl41:SH=»107 
THEN BH=142jSH=10a 
THEN BH»143lSH=»l0S 
THEN BH=*144;SH«110 

^. THEN BH=ll:SH=»ll 

HR^r^-nMOOnrBD- then BH=»l2«SH»ia . 
Hn!5=**nMOLnFB3- THEN BH=llsSH-»ll 
Hr»t="fiMODnFBQ" THEN BH»12j6H«12 

Hn*^"nMOunrcR" then BH=-iisSH=-n 

HOa^-nMODRFCn- then BH=12iSH-12 
Hfl*«"nMOLnFSS- then BH«11sSH-11 
then BH=»1229H=12 
THFJM BH«11:SH*»11 
THEN BH=»iasSH«12 
THEN BH='ll:SHall 

ir nr.— ^ — THEN BH«12i3H«12 

COMMON D(),0*tB*.C*,D*,El!,F*,B»,H«, I*, J> 
COMMON SPl*. SP2S, SC1», NO*, Ffl*, PS, ^^rf^^^^ll^ll^^^' 
COMMON EY*, HPI*, BE*, 6L*, NftS, NRM*. PN, BN, SN, PF, BF, SF 
COMMON Sl&m^ s, T* O , PF« < ) , BF* ( ) , SF* <) , SH, BH, 6t H 
CHflIN"SEflN4" 



HR*="nMOLCYME' 
HR$a-nMODCYHE' 
MOS^^OMOLCYLL" 
HA*«-OMODCYUL' 
H0*a"nMOLnFB0" 



H0«=-OMOl)OFSS* 
Hnta'^PMOLnFME" 
Hftt^-OMOOnFME" 
HO*="PMOLOFLL'* 
Hft*=»"flMOUAFLL" 
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V39« REM PROGRflM -SEHNV CHftlNED FROM 

9400 HEM pRoennn **SEPt4^ 

9410 IF H9««"CFBL5TBD" THEN BH=lxSH=l 
9AeO IF Hn5-"C:FBDSTBD'' THEN BH=-IjS»=1 
9430 IF H0'!i»-CFELSTB8'* THEN BH=«liSH=l 
9440 IF Hft-f^-CFBDSTBG" THEN BH=lsSJI=l 
9450 IF Hn5a"CFBUSTCR- THEN BH«iiSH=»l 
9460 IF HM^a'CFBDSTCR" THEN B1l=»liSH=»l 
9470 IF Hn«="CFBLSTS5" THEN BH==ltSH='l 
948© IF HO*="CFBDSTSS" THEN BH«l:SH»l 
9490 IF HR^^^CFBLS TNE" THEN BH^atSM^a 
9500 IF Hnis=''CFBDSTME- THEN DII=asSM=2 
9310 IF Hn*="CFBLSTLU" THEN DH=3iSH=3 
9520 IF Hnt^-CFBDSna." THEN BH=3sSH=3 
9530 IF nnt^^CFBLMBBD" THEN DH=4:SH=4 
9540 IF Hfl*«"CFBDWBBD" THEN BH=4:SH=»4 
9550 IF HO*=»*'CFBLWBBG" THEN BH=4sSH=4 
9560 IF Hn*=»"CFBDWBBQ'' THEN BH=4:Sn=4 
9S70 IF Hn*«"CFBLWiBCR" THEN BH=4!SII=4 
9SBO IF Hn$« "CFBDHDCR" TFIEN BH=4jSH='4 
9590 IF Hn^"CFBLWBSS" THEh4 BHa4:Sn=»4 
960O IF Hn*«"CrBDHBSS" THEH BH=4sSH=*4 
9610 IF Hn«P="CFBLWBME" THEN BH=5:SH=S 
9630 IF Hftt^^CFBDWBME" THEN BH=5:GH^ 
9630 IF Hfl*-"CFBLWBLL" THEN BH=S:SI^=6 
9640 IF Hn5="CFBDlJBLL" T^E^J BH=6:GH=6 
3650 IF Hn*="CFBLFZBD" THEN BI^=^7:SM=T 
9660 IF HO»="CFBDFZBD" THQ4 Bl 1=7: 31 1*7 
gS70 IF Hfl*=»"CFBLFZBG" THO^ Bn=a:SII^7 
9680 IF Hn«=»»CFBDF2BB- UIEH BM=7jS1I--=7 
9690 IF Hft*=«"CFBLFZCR" THEN BI+=a:SH=7 
9700 IF Hnt="CFBDFZCR- THEN BM=7iGH-7 
9710 IF Hn*=»"CFBUFZBS" THEN BH=ajSH=7 
9780 IF HflS="CFBDFZSS" I KEN UH=7sSH^7 
9730 IF HrW!="CFBLFZWE*' THEN blNS:£3H=10 
9740 IF Hfl*=-CFBDFZM£" MIEN BH==10:SH=lO 
9750 IF Hn^^^CFBUFZLU- IHEN BH=llJSH^l£ 
9760 IF Hnt=-CFBDFZLL" nn£N BH=»ia:l5H=l2 
9770 IF Hfl*»"CFBLWVBD- THEN BH=4xSH=4 
9780 IF Hn«=»"CFDDWVBD- THEN BM=4:Gn^4 
9790 IF Hn*=*"CFBLWVBG" THEN BH=4:SH=«4 
gSOO IF Hn*=»"CFBDHVBG" THEN BH=»42'JH=s4 
9810 IF Hn$="CFBLWVCR" THEN BH=»45SH=4 
9820 IF Hnis=»"CFBDMVCR" TftEN BH=4s3H=4 
9830 IF HA*="CFBLWVSS" THEN BH=4:SH=4 
-9840 IF Hn»«"CFBDWVSS" THEN BH=»4:3H«4 
9850 IF Hfl»=»"CFBLWVME" THEN BH«5iSH=«5 
9860 IF.HA-S^-CFDDWVME- THEN BH=5:SH=5 
9870 IF HO*=a»cFBLWVUL" THEN BH=^:SH=6 
9880 IF Hfit="CFBDWVUL" THEN BH=6:SM=6 
9890 IF HA»="CFBLCY8D" TKtET^ BH=8:SH=7 
9900 IF Hfi-S^-CFBDCYBO" THEN BH=7iSn=7 
9910 IF HM-'CFBUCYBS- THEN BH=»aiSH=7 
9920 IF Hn©=-CFBDCYBe" THEN BH=7:SH=7 
9930 IF Hfl$«"CFBLCYCR" THEN BH=a!SH=7 
9940 IF Hn*="CFBDCYCR" THEN BH=72SU=7 
9950 IF Hns=«»CFBLCYS5- THEN BH=aiS>I=57 
9960 IF Hn9«"CFBDCYS3- THEN BH=7sSH=7 
9970 IF Hn««-CFBLCYME" THEN BH=9tSn=10 
9980 IF Hn$-"CFBDCYME'* THEN BH-10i5H=lO 
9990 IF Hn*«"CFBUCYLU'' THEN BH=lliSH=12 
lOOOO IF HMa-CFBOCYLU" THEN BH=iaiSH=l2 
lOOlO IF Hn-fc-^CFBLOFBO- THEN DH=11:SH=12 
I0«20 If Hfl««-CFBOAFB0" THEN BH^tS-SH^ie 
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10030 IF HflH-^CFBUAFBG" Htl-W 811=11 :SH.:^12 

lOTAO IF Hne«"CFBDnFBe" then BH=iia:yn^ la 

IF Hftt=-CFBUflFCR- THEN BH=U:SH-ia 
IF Hfl$-"CFBDflFCn" THEN BH=l£:SH-12 
10070 IF HR»--CFBl.«FSS- THEN DH=in:SH=12 
10080 IF HOS=»-CFB0flFSS" THEN BH«12:SM=ia 
10O90 IF HR*«-CFBt-flFME- THEN BH«ll:SH=12 
101O0 IF HnS=»-CFBDnFME- THEN BH=12tGII=ia 
10110 IF Hfl«-"CFPLflFUL" THEN BH=»ll:SH«ie 
10180 IF Hn^"CFBDftFUL" THEN BH=IE!SH=12 
10130 IF HntJ--CMBLSTBU- THEN BM«7g:SH=>7 
lOl'V© IF HO-t^-CWBDSTBD" THEN BH=7giSH=7 
1O150 IF HM='-CHBLSTBG- THEN BH=79:SH=>7 
10160 IF Hn«="CMBDSTB6 
10170 IF Hfl«»"CMBLSTCn 
10160 IF Hn*="CMBDSTCn 
10190 IF Hfltia^CMBLSTSS 
10&00 IF HO«""CMBDSTSS- THEN BH=«73:SH=7n 
10810 IF Hn««"CMBUSTME" THEM BHo7A:SH=75 
10220 IF Hn^s-CMBDSTME" THEN BH=r'»: 511^76 
10230 IF HO*-"CMBLSTLL' 
.10240 IF Hfl*-*'CM8DSTUL 
1O2S0 IF Hft«»"CMBLWBBO' 
10260 IF Hn«=»-CMBDWBBD 
10270 IF HO»»-CMBLWBBG" THEN BH=7S:GH=7 
10290 IF HR$=-CMBDWBB0" THEN Bn='76:Sn=7 
10290 IF Hfl*«"CMBLWBCR 
10300 IF Hn*a**CMBDWDCn 
10310 IF Hnt=»-CMBLWBSS 
10320 IF Hn*=-CM8DW8SS 
10330 IF Hfl*«"CMBLWBME- THEN BH=77:SH=^S9 
10340 IF H«t="CWBOWBME" THEN BH=77:SH=70 
10350 IF HO»«"CMBLWBLL- THEN BH=7B:SH=71 
10360 IF Hn«=**CMBDWBLL" THEN BH='7a:5H=72 
10370 IF Hfll^-CMBLFZBD** THEN BHa7giSM=7 
.10380 IF Hfl««-CMBDFZBD 
10390 IF Hfl*=«"CMBLFZBG 
10A00 IF Hn«a"CMB0FZB8 
10410 IF Hn$«"CMBUFZCR 
10420 IF Hn«=**CMBDFZCni 
10430 IF HntJ="CMBLFZSS 
10440 IF Hn««**CMBDFZSS 
10450 IF Hn$«"CMBLFZME 
10460 IF Hn^o-CMBOFZME" THEN BH=«aO5SH=10 
10470 IF HO*="CMBLFZLU" THEN BH=»ei:SH=l2 
10460 IF Hr»»=»"CMBDFZLL" THEN Bn=8lJS!l=l2 
10490 IF HnC^-CMBLWVBD" THEN BH=»76:SH==7 
.103OO IF Hn$=»"CMBDWVBD" THEN BM:=76!SM=7 
l€O10 IF l-m--CMBUWVBG* THEN BH=76:SH=7 
10520 IF Hn$=»-CHBDWVBG" THEN BH^76:£>H=7 
1O330 IF Hn-Ja-CMBLWUCR" T^fEN BH«79:SH=7 
10540 IF Hni>»"CMBDVJVCn" THEN B1I-79:SU=7 
10530 IF Hfl1»«"CMBLMVSS- 
10560 IF Hn*o«CMBDWVSS" 
10370 IF Hn««"CMBLWVME" ll-IEN BH=77:SH=59 
10580 IF HnT=-"CMBDWVME" THEM Bll='77:Sn=70 
10590 IF HA«a"CMBLWVLL 
10600 IF Hn$--CMBOHVLL 
10610 IF Hn*=»"CMBUCYBD« THEN BH=-79:SH=7 
10620 IF Hfl-^a-CMBDCYBD" THEN BH=«79;SH=»7 
1063© IF Hfl«=-CMBUCYBB- THEN BH=79:SH='7 
10640 IF Hn*="CMBOCYBB*' THEN BH«79:SH=7 
10650 IF Hft*«''CMBLCYCR- THEN BH=79:SH=7 
-10660 IF Hn*«"CMBDCYCn" THEN BH=7g:GH=>7 
tOSTO IF HO*«-CMBLCYSS" THEM BH=7g:SH=7 



THEN BH=7gsSH«7 

THEN BH«7g:SH=>7 

THEN BH=7g:SH=»7 

THEN BH=>73:SH«73 



THEN BH=75:SH=77 
rHEN BHa75:SH=78 
THEN BH=76:SH=7 
THEN BH»76rSH=7 



THEN BH«7g:SH=7 
THEN Bna*7g:SH=7 
THEN BH«764SH=67 
THEN BH«76jGH=68 



THEN BH=79«SH=7 
THEN BH=7g«SH=7 
THEN BH=7g:SH=7 
THEN BHa7g:SH=7 
THEN BH=»79:SH=7 
THEN BH=79:SH=7 
THEN BH=7giSH=a7 
THEN Bilbao :5H= 10 



TFIEN Bn=75sSH»57 
THEN BH«76:SH=68 



THEN BH=78sSH=71 
THEN BH=»7aiSn='72 
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107M IF Hft^XWBDCYME" THEN BH=80»a*««» 
l«7l6 IF HOS--CMBUCYU-" THEN BH=airSH^ia 
l«720 IF HP9=»-CMB0CYLL" EN BH=a I s S! I«- 12 
19730 IF HP»-"CMBUftFBD" 'iHEN BH=12jSH=^1£ 
197-48 IF Hfl$="CMBDflFBO- THEN BH==I2:SH^12 

10750 IF HfH»«"CMBLnFBG" THEN BH='12xSH==l2 - 
10769 IF Mn«=-CMBimFBQ- THEN BH=12:SII=12 
ie770 IF Hn«-"CMBLnFCR" THEN BH«12sSH»12 

19769 IF Hn»3-CMBDnFCn" THEN BH»12sSII=l2 - 
19799 IF H05-»aiBLnFSS- THEN BH«12rSfr«12 
19899 IF HnS«-CMBDOFSS" THEN BH=12sSJ 1=^12 
19819 IF Hfl9»-CriBLAniE- TVtEN BH=12:SH=rl2 
-19B29 IF Hnt^-CMBDnFME" THEN BH=12jSTN12 
19839 IF Hn*="CMBUAFUL" THEN BH=12sSH=l2 
198'^ IF Hn*«*CMBDflFlX- THEN BH=12:SM=»12 
19839 IF Hns^-RFBUSTBD'* THEN BH=30:SH=»a6 
-19869 IF Hn9=*firBDSTBD" THEN BH=39jSH=66 
19879 IF HR»=-"nFBLSTBB- THEN BH=104»SH=B7 
19869 IF Hn*=***nFBDSTBG- THEN BH=»1955SH=:aB 
19899 IF Hn$t--nFBWSTCR- TfCEN BH=196 :SH=»73 
L9999 IF Hn*=-nFBDSTCn- THEN BH=a9zSH=73 
1^919 IF HM«-PFBL3TSS- THEN DH=3ltSH=31 
19929 IF Hn»«**«FBDSTSS" THEhJ BH=32:SH«32 
19939 IF Hn9«»*flFBLSTME~ THEN BH«335SH=»33 
199'V9 IF Hn^^^-nFBOSTME" THET'I BH=3^sSH=34 
19959 IF Hn«-«-nFBLSTU.- IHEW BH=353SH=35 
19969 IF Hn»«-nFBDSTU-" THQ'I BH<36sSH=36 
19979 IF Hfl»=»"flFBLWBBO" THEN 6*4=99 sSH=^6 
19989 IF Hfl*»-ftFBDWBDD" THEN BH=g9:SH==86 
19999 IF Hft»-"nFBLWBBG" THEN BH«ll3:SH=g5 
11999 IF HA*=»"flFBDWBBG" THEN BH=ll4iSH=g6 
11919 IF Hn*«-PFBLWBCn- THEN BH=*lO&iSH=i79 

11929 IF Hn^^^-RFBDWBCn" THEN BH=a9jSH=«79 

11930 IF Hfl*--RFBLWBSS" THEN BH=37sSH«37 
.11949 IF nm^-^RFBOWBSS" THEN BH=3aiSH-38 
11959 IF Hn*-"RFBLWBME- THEN BH=^39ySH=39 
11969 IF Hfl*="RFBDWBME- THEN BH=49iSH=^ 
11979 IF HP»»"nFBUWBLL" THEN BH==41sSH=41 
11989 IF HRS="flFBDWBUL" THEN BH=A2:SHaA2 
11999 IF Hfl*-"ftFBLFZBD" THEN BH=99sSH=a6 
1 11^ IF HO»--nFBDFZBD" THEN BH=g9sSH«a6 
11119 IF Hn5--flFBLFZBG" THEN BH=1 13:SH=103 
11129 IF Hn*-"OFBOFZBB- THEN BH=ll4:SH=il94 
11139 IF Hn»»-nFBLFZCn" THEN BH='196:SH=79 
111A9 IF Ha^a^nFBDFZCR" IIIEN BH=89iSH=79 
11159 IF Hn!>»-nFBLFZSS" THEN BH=8»SH=^ 
11169 IF HP*=-"flFBDFZ55" THEN BH=»7»SH=7 
11179 IF HP*— OFBLFZME" THEN BH=«9sSH=9 
lliao IF HP^-^PFBUFZWE" THEN BH=l9tSH='lO 
11X99 IF HP*«-nFBLFZLi.- THEN BH=ll:SH=»ll 
11299 IF HP«»'"PFBDFZLJL" THEN BH^iesShNlE 
11219 IF HP*»*nFBLWVBD- TViEti BH=99iSH«a6 
11229 IF HP«=»"nFBDWVBD" THEhJ BH=39:SH«e6 
11239 IF HP*»-RFBUV4VBS- THEN BH=il3tSH»g5 
11249 IF HP»=i"nFBDWVBB" THEN BH=ll4tBH=«96 

11259 IF HR»=*-RFBUWVCR" THEN BH=»196: SH«79 > 
11269 IF Hn»='*PFBDHVCR" THEN BH=a9sSH=79 
11279 IF HPO-^RFBLHySS" THEN BH=37iSH=»37 
.11289 IF HPS-'nFBDWVSS" THEN BH^BsSH^Sa 
11290 IF Hfl'>«''RFBLHVME- THEN BH=395SH=39 
-11399 IF liR*«-nFBDMVME" THEN BH=»49 1 S! 1=49 
11319 IF HRS«*flFBUWVLL- TltEN BH=41:SH=41 
11329 IF Hn'>=«"nFBm'IVU.- THEN BH=42sSH=42 
11339 IF Hfl*-"RFBLeYBD" THEN BH=39sSH=^6 
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11J40 TF HAf»"AF8DCYBG 

113S0 IF HW-RFBLCYHB' 
11360 IF Hfl«="OF9DCYBG" 
1W70 IF Hft5»-RFBLCYCR'' 
11383 IF Hfl*=-"fW^BDCYCn" 
%t399 IF HRt-"fiFBUCYSS" 
11-W9 IF Hft!>»-OFDDCYSS- 
ItAie IF HW--nFBLCYME" 
11490 . IF HW^-flFBDCYME" 
ltA30 IF HO!P--fiFBUCYlJ-" 
114A0 IF HR<«"PFBDCYLL" 
11430: IF Hn^"AFBLflFBD" 
11460 IF Hfl»»-W=^BDnFBD" 
»i470 IF Hfl»»"nFBLnFBG" 
llAGO IF Hn*=»-OFBDnFBt3*' 
11A90 IF HO»*«**RFBLnFCR- 
1130O IF Hn«=»-nFBDnFCR" 
ttSlO IF Hflt«*nFBURFSS'* 
11380 IF HRS^^-OFBOflFSS" 
ItaaO IF Hft*--RFBCjRFME- 
113A0 IF MR*=-OFBDOFNE" 
11350 IF HOft-^RFBLnFUU" 

iiseo IF Hn*«"nFBDnFLL" 

11370 IF Hftt«*"OMBLSTBD" 
IISBO IF Hr»*«**OMBDSTBD" 
ItSTO IF Hn*-"nMBUSTBG" 
11600 IF HO^o^RMBDSTBe" 
11610 IF HM»"PMBL5TCR- 
11S20 IF Hnt--nMBDSTCR" 
11630 IF Hnei-"nMBU9TS3- 
116AO IF Hn*=« "PNBDSTSS" 
11650 IF Hn!>-"nMBLSTME" 
11660 IF HO*=»'*PMBDSTME- 
U670 IF HntS-^PMBLBTLL" 
tl680 IF HRt»-PMBDSTU-" 
1J698 IF HR*-"RMBLWBBD" 
11700 IF Hn*«-PMBDW8BD" 
11710 IF Hn»-"RMBLWBBQ" 
11720 IF MO$«»"PMBDWBBG" 
11730 IF Hn^-"RMBLWBCR- 
117A0.IF Hn^a-RMBDWBCR" 
U730 IF HR^«"RMBLWDS3- 
11760 IF Hn5«-nMB0WBS3" 
U770 IF Hn««"PMBLWBME" 
ll7flO IF HR^-^nMBDWBME" 
11790 IF rm-TlMBLWBLL" 
UaOO IF Hnt=--nt«IBDlIBLL" 
11810 IF Hn«-"nMBLFZBD" 

iiaao IF Hn»«"nMBDFZBU" 

11830 IF Hn*--RWBLFZBQ" 
11840 IF Hn«="flMBDFZBG- 
Uese IF HR^-^nMBLFZCR- 

-iteeo IF MR*=»''nriBDFzcn- 

IteZO IF Hnt=«"flMBLFZSS- 
tiaaO IF HR1i«"RMBDFZSS" 
11890 IF Hnt«"nMBLFZME" 
11900 IF HRT-^RMBDFZME- 
ItgiO IF HR«-»"nMBLFZLL" 
11920 IF Hn*»«-RMBDrZLU" 
Hg30 IF Hnt-"RnBUWVBD'' 
11940 IF HR^«-RHBDHVBD" 
1*930 IF HRt'«-RMBLHVBG" 
11960 IF Hnt«*"nMBDWVBQ" 
11973 IF HR>«-RMBLHVCn" 

1193^ IP Ht\%^\mMVSS* 



THEN BM=»121:SH«103 
TK • BH=>122!SH=1'94 
TKttn* BH=106sSH=79 
THEN BH=89tSHa79 
THEN BH=3asSH=a 
THEN BH=7sSH=7 
THEN BH=9tSH=9 
THEN BH=lOsSHal0 
THEN BH^-lliSH^ll 
THEN BH=»iaiSH=l2 
THEN BHall:SH=sH 
THEN BH=»ia:SH=^12 
THEN BH=«llsSH=ll 
THEN BH==12:SH»12 
THEN BH=«ll»SH=ll 
THEN BH='12:SH=»12 
THEN BH=il:SH='ll 
TirEN BH:sl2:SH=12 
THEN BH=HiSH«ll 
THEN BH=12tSH=l2 
THEN BM=»11»SH=«11 
THEN BH=12:SH=12 
THEN BH=103iSH=86 
THEN BH«103iSH=»86 
THEN BH=1043SH=87 
THEN BH=l03»8H=a8 
THEN BH=»106»SH=79 
THEN BHa89jSH=«79 
TH^ BH=»l07sSH«a9 
THEN BH=3l08:SH=30 
THEN BH=109:SH=i91 
THEN BH=»110iSH=9a 
THEN BH=«llliSH=g3 
THEN BH«112sSHa94 
THEN BH=103tSH=»06 
THEN BH=103jSH-B6 
THEN BH=113:SH=95 
THEN BH-H4»SH=96 
THEN BH=106«SH=579 
THEN BH=8g»Sfl='79 
THEM BH=llStSH=97 
THEN BH=ll6iSH=>9a 
THEN BH=117iSH«99 
THEN BH=lia:SH=10O 
THEN BH=il9sSH=»10l 
THEN Bn=l20sSH=»102 
THEN BH=1038SH=86 
THEN BH=3l03iSH=a6 
THEN BH==121:SH^103 
THEN BH=122:SH=104 
THEN BH=»I06:SH==79 
THEN BH«89iSllc»7g 
THEN BH=123jSH=8 
THEN BH-l24sSH=7 
THEN BH«12StSH^9 
THEN BH=126:SH=10 
THQ^ BH=»lliSH=»ll 
THEN BH=t2:SM=»12 
THEN BH=1035SH==86 
THEN BH=*103:SH=»86 
THEN BH^llSiSH^gS 
THEN BH=ll48SH=:96 
THEN BH=106:SH='79 
THEN n|(-rn9:SH*7« 



THEN BH-nsi5H557 
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12069 

18839 
L88A9 
18890 
-18869 
18879 
.18830 
18890 
18390 
18319 
18380 
18330 



IF AM80HVSS" THEN BHsu6i5H»98 

IF H«««-flMBUWME" THEN BH=1 17:SH=»93 
THEN BH°iia:51l»190 



IF Hn»-'"flMBDl4VME 
IF Hn^^-ftMBUUVUL" 
IF Hn»*"nMBDlWLL." 
IF Hn!lt--nMBUCYBD- 
IF Hn»--n«BDCY8D" 
IF m*-"flriBCCYBG" 
IF Hn»=**flMBOCYBG" 
IF Hn^^-RMBLCYCn" 
IF HR»«-flMBDCYCn" 
IF Hn»-"nMBLCYS3- 
IF Hn^^oTtMBDCYSS" 
IF Hn»°"OMB1-CYME" 
IF Hft'>«-nMBOCYME- 
IF Hn*»"RMBLCYLL" 
IF HflJ^-flMBDCYU-" 
IF Hniini«OMBLPFBD 



THEN BH<=ll9sSlt=>191 
THEN BHai89>SH»102 
THEN BHal03:SH=>a6 
Tl-iEN BH»103tSHaa6 
THEN BH=181:SH=»103 
THEN BH==188tSH^194 
THEN BH=«106fSH=-73 
THEN BH«a9»SH»73 
THEN BH»183:SH=a 
THEN BH^ia'VsSH^? 
THEN BH='185!SH=9 
THEN BH«1865SH=10 
THEN BH«ll«SH=ll 
THEN BH318jSH=18 
THEN BH=»lliSH»ll 



IF Hn»«"flMBDnFBO- THEN BH»18iSH=*l*a 
IF Hn»«''ntgBLflFB8" THEN BH=xllsSH»ll 



IHEN BH=i83Slh»ia 
THEN BHall:SH=ll 
THEN BH»iaiSH=18 
THEN BI4=«ll»SH»li 
THEN BH=>ia:SM»ia 
THEN BH=>lliSH»ll 
THEN BH=iaiSH=»ia 

^ ^ THEN BH=llcS}l»ll 

IF Hn»«"flMBI>OFU_" THEN BH=ia»SH=ia 
COMItON D < ) , fl« , B«, C*, 0», E«, F^ , G*, H*, I«, J* 

COMMON SPl», SPa«, SCl«, NO*, FOt, PB, Be, SB, PE, BE, SE, PB, BB, SB 
COMMON EY*, HA*, BE*, SL», Nfl», NflMS, PN, BN, SN, PF, BF, SF 
COMMON S IGN*, S, T* ( ) , PF* ( ) , BF« t ) , SF« ( ) , SH, BH, S, H 
CHfllN^SEANS" 



IF Hno^-nMBDOFBQ" 
IF Hn*-"AMBLflFCn" 

IF Hn*«"f»HBonFcn- 

XF HO*«»-nMBLAFSS- 
IF Hn»=*''ftMBDOFSS- 
IF Hn^-^RMBUAFME** 
IF HO^-^PMBDAFME" 
IF Hft»«"ftMBl-RrU. 
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ie3A8 REM THIS IS PROGRftfA "SEflNS- CHfilNED FROM 
1£3S9 REM PROGROM "SEW^ ' 
13360 ZI^-PEE-iZZa^STRXPE) iPFfitl)-" 
12370 Z««"P»iN" s ZZ*=»STR* <PN) sPF* (2) «*' 
12380 Z*«-PFF":ZZ$=STR«(PF) tRF«t3)=«" 
12390 Z«--pBB"iZZ*==STR'>(PB) :PF*<4)=«'' 
ISAeO Z«a«*PS8''j2Z»«STR*(PB) :PF$(5)=»" 
12410 REM 

1^420 • Z**'*BIIH*' I ZZ«»STR* <BH) sBF* C 1 ) 
12430 Z*--BEE" 5 ZZ««STR« (BE) iBF* (2) =»" 
12440 Z««-BNN-lZZ*«STR*<BN) jBF*t3)«- 
124S0 Z*--BFF-iZZ»=SrR«(BF) sBF«(4)=" 
12460 Z1»«-BBB"iZZ«=STR'KBB> :BF$(S)=" 
12470 Z5=»-B88" t2Z*=»STR»<BQ) «BF«(6)«" 
12460 REM 

12430 IF SP«13 THEN SF* ( 1 > " i SOTQ 12520 

12500 2*«"SHH« « Z2»«STR* <SH) :SF* ( 1) =" »>ZiS :MID* (SF* ( 1 ) i 1 . 3> =Z» 

J^,?~SEE-'.1?^^^ --.Z2..MII>*(SF*C2N1.3,=.Z. 
12S30 Ze^-SNN" r ZZ««9TRS (SN) tSF* <3) -+Z2« t MID* (SF* (3) , 1 , 3> =2* 
123A^ Z-s»-SFF" I 22«-STR* (SF) i3F* (4)=" "+Z2$iMID« (SF* (4) , 1 , 3>-Z* 
12330 Z-M-SBB-iZZ»-STR»(SB)»SF*(6)-« -4.22«:MID« (SF* (6) , 1,3>=Z* 
12360 Zt--8BB-jZ2*-STR$<SB) jSF»(7)=" "+Z2*tMID!> (SF« (7) , 1, 3)=Zt 
12370 IF I»="Y" THET'I PF*( 

laSBO DEFINT I " 
123B0 LPRINT T* ( 19) iLPRINT T« ( 17) :LPRINT T*<ia) 
12600 LPRINT T'><14) sLPRINT T* ( 15) : LPRINT T«<16) 
12610 DIM PX(1S>,PY<13),R(15),FIW«(15) 
12620 FOR I-l TO lOiREHD Z ( 1 > , 2Z ( I > sMEXT I 
12630 FOR I«l TO SsREflD W (I) , WW( I ) :NEXT 1 

1533 J pntiTr~grin0'(r?s)'t 

12660 LPRINT " j s H 

ISII ON''!i!l(NPMl?"BDSUB 12730, 12630, 12360, 13100, 13250, 13410, 13B10. 13410, 13610, 
3510 

12690 60TO 14160 ' 
12700 REM 1 t-ETTER NAMES 
12710 FOR II»1 TO 4 
12720 GOSUB 13820 

12730 PX(1)=Z(2) :Py <1)=»ZZ(2) :R<2)«=0 

12740 PX(2)»Z(S> fPY(2)=iZZ(3) : R (3) «19tFIN» (2) -MID* (Nm«, 1, 1) 

12730 PX (3)«Z (6) tPY (3) =»ZZ (6) sR (6) =18 JFIH« t3)«"PLURflL". 

12760 PX(4)-Z(9> iPY(4)=-ZZO) i R (9) =341 :FIN* (4) «"STRR" 

12770 FOR I»l TO 4 

12780 GOSUB 13840 

12790 NEXT I 

12800 NEXT II 

12B10 RETURN 

12820 REM 2 LETTER NAME 

12630 FOR 1 1=1 TO 4 

12840 GOSUB 13B20 

12850 PXC1)=W(2) iPY(l)««W(2) iR(2>«0 

12960 PX{2)«W(4) »PY(2)=WW(4) : R (4) =19tFIN* (2) =MrD* (NRM*, 1, 1) 
12870 PX<3)«W(5) sPY(3)=WH(5) iR (5) ^-igrFIN* (3) =MID« (NAM*, 2, I) 
12680 PX(4)«VI(6) :PY(4)=MWt6) iR (6)=18:FIN^fc{4)="PLURnL" 
12890 PX<3)=»W(a) :PY(S)=WW(8) :Rta)«3Sl:FlN*(5)="3TflR- 
12900 FOR 1*1 TO 5 
12910 GOSUB 13840 
12920 NEXT I 
12930 riEXT II 
12940 RETURN 

12950 REM 3 LETTER NOMES 

FOR list TO + 
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12970 GOSUB 1.3 8 20 

J2980 -PX(t)=Z(a> xPYlD^ZZta) tR(2>=0 

-1B99« PX(2)-Z<A) iPY(2>«ZZ (4) «n<A> ^l^sFlNt (a>=MID« (NflHi, I, D 

13M0 PX <3)-Z (5) :PY (3) =Z2 (5) t fl <S) ol9xFIN$ (3) ='MID» (NPM?, 2, I > 
PX('^)«Z<6) 5PY<4>=»ZZ(6> tR<6) =ietFIN*6 (4) ^MID* lNftM$, 3, 1) 

131820 PX (5> -Z (7> SPY (5) «ZZ (7) s R (7) 1 FIN* (5) =»-PUURflL- 

13030 PXt6)-Z(9> |PY(6>=ZZ19) »R(3) =3Al jFlNS <6) ^^STRR- 

iad'kQ FOR I«l TO 6 
•130S0 0DSU8 138A0 

13060 NEXT I 

13070 NEXT II 

13080 RETURN 

13090 REM 4 LETTER NAMES 
13100 FOR II=»t TO 4 
13110 GOSUB 13830 

13120 PX(l)=W(i> tPY(l)=WVI(l) |R(1>=355 

13130 PX(2)=W(3> tPY(2)=Wl^(3) s R (2) =»16«F1N4 (2) =MIO* (NftM», 1, 1) 
13140 PX<3>«W(4) »PY(3)=«JW<4) i R C3) =»18iFlN* t3> =MII)* (NftM», 2, 1 ) 
13150 PXt4)««(5) »PY(4)=VM(S) iR (4) »l7sFIN$(4)««lD» (NPM«, 3, 1 ) 
13169' PXC5)«=W(6> iFN'(3)=4Wt6) sR<5) = 16tFIM* tS>=MID»(NnM»,4, 1) 
13170 PX<6>=4Jf7) :PY(6)=HU(7> !R(6)=SsFlN$(6)=-PLURflL" 
13180 PX(7)«l^{9> iPY<7)=»rtJ(9) t R (7) =339sFIN* C7) ="STflR" 
13190 FOR I«l TO 7 
13200 80SUB 13840 
13210 NEXT I 
13220 NEXT II 
13230 RETURN 

13240 REM 5 LETTER NRMES- 
-13250 FOR II«1 TO 4 
13260 SOSUB 13820 

13270 PX(1>=Z(1) !PY<l)oZZ(l> iR(l)=>356 

13280 PX(2)«Z(3) :PY<2)=»ZZ(3) iR(2>«lS:FIN«(2)=MID«t (NPM*, I, 1) 

13290 PX(3)=»Zt4) jPY(3)=ZZ(4) s^R (3>«19f FIN$(3)=«ID* (NAM*, 2, i> 
.13300 PX(4>«ZCS> jPY(4)=ZZ(S) tR <4)«19sFIN*(4)=MID« (NAM*, 3, l> 

13310 PX<3)=»Z(6) iPY(S)=»ZZ(6> sR(5)=«ieiFIN*(5)=MID'^(NflM*t4, 1) 
a3320 PX<6>«Z<7) 5PYl6)«ZZt7> sR (6)«10sFIN* (&) ==«ID* (NAM*, 5, t) 

13330 PX(7)»Z(8) rPY<7)=ZZ(8> t R (7>=356:FIN* (7) =»"PLURRL- 
.13340 PX(8>-Z<10) :PYta)«ZZ(lO) sR ta)«329:FIN« (8) ^-STAR" 

13330 FOR I-l TO 8 

13360 80SUB 13840 

13370 NEXT I 
:'13380 NEXT It 

13390 RETURN 

13400 REM 6 A a LETTER NAMES 
*13410 FOR II=«1 TO 4 ^ 
13A20 60SUB 13820 

13430 PX<1)«=W(1) sPY(l>«HW(l) sR<l)»3S5 
13440 PX(2)-=1^(2) sPY(2>=WW(2) jR(21=a 
13450 PX(3>=H(3) «PYC3)=WW(3> :R(3)=»16 
13460 PX<4)-=W(4) :PY(4>»WW(4> !R(4>«18 
13470 PX(5)»H(5) 5PY(5}=WW(g> :R(5>«17 * 
-13480 PX(6>«W<6> :PY(6)=WW(6) sR(6> = t6 
13490 PX(7)«H(7) sPY(7}-=HW(7> iR(7)«6 
.13300 PX{8)«=W(a) tPY(a>=WW(8) iR(8>=»3Sl 

13510 PX(9)=W(3) iPY(9>=t/W(g) jR(g>=339:FIN*<9)=«"PLURAL** 
13320 IF LEN(NAM»)=a THEN 13540 

13330 FOR 1=2 TO TtFlN* (I) »MID* (NAM*, I-l, I ) iNEXT I 2FIN* (8) «"PLURAL" :FINS (9J a"STt: 
tR-tOOTO 135S0 

13940 FOR 1=1 TO BiFIN»(I>=MID« (NAM* , I, i ) iNEXT I 
.-X3550 FOR 1=1 TO 9 * 
13560 GOSUB 13840 
13570 NEXT I 
13580 hJEXT II 
13590 RETURN 

136P«^ REM 7*9 LETTER NAS4E5 

«610 FOR ir=^i TO^ 
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i3620 GOSUB 13810 ^ 

tai^o PX<2)«z(2) iPY (2)=zz (2) 2n<a>=® 

i36SC PX<3)»Z<3) sPY(3)=-ZZt3j fn<3>=lS 
1366^8 PX<4)=Z('i> iPY<4)=ZZl4) :n<4)=»l9 
i367e r.x<S)-Z(5)tPY(5)='ZZ(5) xR(S)-=19 
t3SflO PX(6)«Z<6) tPY(6>«ZZ(6^ jR(6) = lB 
i3690 pX(T)»Z(7)tPY(7)=ZZ(7) iR(7>=»10 

t37OT px<a)=*z(a> iPY(8)=zz(Q) in«a)=3ss 

QR** I GO 1 3770 

137TO ran i=*i to giFiN!n(i>«MiD«{NnM», i, i> :next i 

13769 IF LEN<NflM«)»10 THEN FIN* ( 10) =MID» (NRM*, 10, U 

13770 FDR 1-1 TO 10 
13780 'POSUB 13840 
13790 NEXT I I 
13800 r:EXT It 
13610 RETURN 

\3^l ^°nli^'-i^c^-^^^^ PA*.RETURN 
13840 n9«8TR»(IO) sflR»=MlD* <ft». 2, 1> tft*=FIN» (D+Ofl* 
13850 FIf=-"C:"+«* 
13860 OPEN -I"t»l,Fl« 

t3a7G -q(l)=»R(I>+90sR{I)-R(l>*3- 14159/180 
TbI Cl-C0S<R<I)):C2-SimRlI)).C3-SlN(R(I)>:C4-^^^ 

13890 ir4PUTftl,X*sNP«VflL(X*) 
13900 FOR IC«1 TO NP 

sr;iS5tr.::;rv:jr,s,';s;.ss;»'?s«..«-rR..,x,=v.«T«,<.v,.x.^..«. 

IC^IC+'l 

13^30 LPRINT X$sNEXT ICfCUOSEftl 5 RETURN 

I3I40 I x"nnci' B*C3 : I Y-A*C2+B*C4 : I X-I X+PY ( I ) : I Y=I Y^X ( I ) +100 1 RETURN 

13950 DOTn 0,510 

♦3960 DOTP 175,570 

13970 DRTP 'iOO, 620 

13980 Unro 560,595 

13990 UPin 680,550 

14000 DPTfl 800,500 

l/|010*DnTA 880,435 

14020 OOTn 950,365 

14O30 onrn 1030,305 

14040 DATA 1130,285 
14050 REM 

14060 DPTO 100,525 
14070 UOTfl 305,500 
14080 DATA 486,576 

14090 onrn 6 i 4, 545 

14100 DATA 730,510 
14110 PA FA 840,471 
14120 DATA 210, '100 
14130 DATA 980,321 
14140 DATA 1060,280 

I4II0 irH"?'?NEN GOTO 14330« REM SPORT HAS A CAP OR HAT DO NOT DRAW TOP OF H 

14170 FOR TM-1 TO 116 J REM NUMBER OF HAIR TYPE9 
14180 READ HI 
14190 IF SF«TM THEN 14220 
1A200 NEXT TM 
14810 GOTO 14350 
14220 FOR 1=8 TO 1 STEP -1 
1423e SFOiCI + D^SFt tl) 
14540 NEXT I 
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14£S5 5FJjtV)=SF$(lD+''H'' 

14a6»G0TO 14350 

14270 REM THE FILES VflLUES OF SmRT HAIR 

-14260 DRTO 1, I, IfAf^f'Vf 7, 9, 10, H, 12, 13, IS 13, 14, 13 V, 19, 30, 19, 20, 19, 20 

1A290 DflTfi 25, 26, 25, 26, 25; 2S, 31, 32, 31,32,31, 32*37, 38, 37, 38, 37, 38 
. tA308 DflTO 43,44, 43, 44,43,04,49,50, 49, 50, 49, SO. 53, 56, 55,36,55, SB 

14310 DRTO 61,62,61,62,61,62,67,68,67,68,67,68,73,74,73,74,73,74 
-.14320 DATO 79,80,81,80,81,80,81,86,87,88,89,90,89,90,83,90 

14330 DRTO 93, 96, 97, 98, 97, 98, 97, 98, 103, 104, 105, 106, iOS, 106, 105, 106 
-.tA340 DftTfl 111,112,111,112,111,112 

14350 REW PORPUOT.BfiS 
. 14369 REM PROFILE PLOT 

14370 LPRINT -U PS* 

14380 LPRtfrr TXDiLPRINT "XhBHlER-iLPRIMT Nfl*:LPRINT CHR*(95) 
14390 LPRINT "U PS" 
14400 LPRiriT T*t2) 
14A10 LPRlhfT CHR-UgS) 

14420 REM PLOT SPORTS NAME 2 LINES IN PROFILE 
.14430 LPRirrr T*tl9) iLPRINT T*<20) 

14440 LPRINT "U P3* 

144SO FOR 1=1 TO 8 

14460 PRINT PF*(I) 
-14^70 IF PF4{I)«"- THEN 14560 

1A480 PF!5»"C:*+PF9(I) 
-14490 OPEN -I",»1,PF* 

14500 INPUT ftl, NP 

14510 FOR J«l TO NP 

14520 INPUT »1, C$ 

14530 LPRINT C* 

14S40 NEXT J 

14550 CLOSED! 

14560 NEXT I 

14S70 REM BAt>IKNOTE PLOT 

14380 LPRINT "U PI" 
14390 FOR 1=1 TO 7 
•14600 IF BFidl^-" THEN 14690 
14610 BFS="Cl**+DF*(I) 
14620 OPEN '*I",f>l,BF$ 
14630 INPUT 51,f4P 
14640 FOR Jal TO NP 
14630 INPUT «1, C4 
14660' LPRINT CS 
14670 NEXT J 
14680 CLOSE »1 
14690 NEXT I 
14700 LPRINT "U P6" 
14710 LPRINT T«(3) 
- 14720 RQi aiANGE TO SMALL PEN 
14730 LPRINT "U PS" 
14740 LPRINT T*t4) 
14750 LPRINT T* (5> 
14760 LPRINT T*(6> 
14770 REM CHA^JGE TO BIB PEN 
14780 LPRINT "U P2** 
14790 LPRINT T* t7) 
14800 LPRINT T*C8) 
14810 REM CHANGE TO SMALL PEN 
14820 LPRINT "U PB" 
14830 REM PLOT VARIABLE NAMES 
14840 IF T-XID^"" THEN 14860 
14830 LPRIhTT T$(ll> 
14860 IF T*Cl2)=-~ THEN 14890 
14870 LPRINT T*(12> 
14880 REM aiAr^GE TO BIG PEN 
14890 LPRINT "U P3" 
1490<9 LPRINT T*(9) 
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I49l0 LPRINf T$(10) 
- 14920- LPRINT "U PE" . n |i 

14930 IF S=»l THBJ SFJ» (7)= 

149A0 REM SPORT PLOT 

14950 FOR 1=0 TO 9 

14960 IF SF«(I)="" THEN 15050 

14970 SF«»"Cj-+SF*(I> 

14960 OPEN "I-.IHiSF* 

14990 INPUT tti, NP 
•.15000 FOR J=»i TO NP • 

13010 INPUT «1, C* 

ISOaO LPRINT C* 

13O30 NEXT J 
- 130AO CLOSE »l 

15050 NEXT I 

t<?0iAO TX*=NO*+" THE" 

llo70 YO=14A0+C<lNT<(17-LEN(TX$))/2))»iB) 

13080 NX«30AO:INX=ia 

1S090 FOR 1=1 Td LEN<TX*) 

1314^ YD«VO+INX 

13110 F1*=MID«(TX*, I, 1) 

igieo IF FI-^^" " THEN 15230 

13130 FX«="C:"+FI* 

13140 OPEN «I-,»1,FX* 

13130 INPUT»1,X«|NP''VPL(X*> 

13160 FOR 11=1 TO NP 

Will i^P^uinlP X,9» THEN lNPUT»l,Y..II=II*l:Y-VflLiy»>.y-Y*YO«XX*»X»*STR.(Y, 

13190 LPRINT XX* 
13200 NEXT II 
15210 LPRINT "U- 
13220 CLOSE Wl 

lo«l4«^-<(II^(<17-LElUSCl*)>/2))»ie) 
•13250 NX--2990tINX«ia 
13260 FOR I^'l TO LEN<SCi«) 
13270 Y0=»VO+INX 
13260 FI*=MID«<SC1«, I, I) 
13290 IF FI*«" " THEN 15400 
133^0 FX*»*'Cs"+FI* 
i33i0 OPET^ -t-,»l,FX$ 
13320 lNPUTftl,X$iNP=VflL(X») 
13330 FOR TO NP 

"X){Lui?tlF X>90 T^EN iNPUT»l,Y..U=n.l.Y=VflL(Y*>:Y-Y*yO.XX«-X.*8TR,(Y> 

13360 LPRINT XXS 
13370 NEXT Ih 
13380 LPRINT **U" 
13390 CLOSEftl 
154O0 NEXT IfNE«l 
134 lO COMMON NE 
1S420 CHftlN-HUMOR" 
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WHAT IS CLAIMED IS: 

1. The method for producing a personalized 
pictorial and text presentation comprising the steps of; 

storing selected personal information and 
physical data of a person; 

storing pictorial background information to be 
used in the preparation of the presentation; 

storing standardized textual information 
compatable with the pictorial background information; 

converting' the stored personal and physical data 
to a pictorial representation of a person; 

combining the standardized textual information 
with the personal information to provide personalized 
text information; and 

reproducing a personalized pictorial rendition 
against the stored pictorial background accompanied by 
personalized text. 

2. The method in accordance with Claim 1 in 
which the storing of personal information and physical 
data is done by physically entering the data on a common 
media. 

3. The method in accordance with Claim 2 whereby 
the storing of personal information and physical data is 
accomplished by making machine readable marks on and by 
machine reading a card. 

4. The method in accordance with Claim 1 wherein 
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the step of converting the physical data is accomplished 
by storing a plurality of pictorial representations of 
different physical characteristics; 

comparing the physical data inputted with the 
stored pictorial representations; and 

selecting the matching pictorial representations 
for reproduction. 

5. The method in accordance with Claim 1 in 
which the step of combining personal data and 
standardized text information comprises the step of 
inputting the personal data ino a computer viiich stores 
the standardized text information in the appropriate 
position in the text; and 

selecting appropriate gender for the standardized 

text. 

6. The method in accordance with Claim 1 in 
which the step of reproducing the combined pictorial and 
textual greeting card or poster comprises the step of 
printing the personalized textual and pictorial 
information on a standardized background including 
standardized text and background with the personalized 
textual information inserted in the blanks in the 
standardized text and personal pictorial rendition 
inserted in the blanks in the stored pictorial 
background. 
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7. Apparatus in accor^Jance with cl-aim 6 
including means for selecting appropriate language based 
upon at least one of the following factors: age, sex, 
and pastime. 



8. A method of producing a personalized drawing 
of a user within preprinted background material 
comprising the steps of: 

recording a plurality of factors affecting the 
user's appearance; 

selecting at least two predesigned visual 
features most fitting to the uSer from a plurality of 
predesigned visual features in accordance with the 
plurality factors affecting the user's appearance; 

automatically controlling a plotter to draw the 
at least two predesigned visual features most fitting to 
the user within the preprinted background material to 
produce a continuous and personalized drawing of the 
user. 



9. The method in accordance with claim 8 in 
which the at least two visual features most fitting to 
the user comprise the user's nose, hair style, eye, chin 
and ear. 

10. The method in accordance with claim 9 in 
which the plurality of factors affecting the user's 
appearance comprise the following factors: 



the user's age; 
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the user's sex; 
the user's race; 

the length of the user's hair; "^^ 

the color of the user's hair; 

the user's hair type; 

Aether the user has facial hair; 

the size of the user's nose; 

\^ether the user wears glasses; and, 

the user's build. 

11. The method in accordance with claim 10 in 
which the personalized drawing of the user comprises a 
profile. 

12. The method in accordance with claim 8 further 
including the steps of: 

recording a favorite pastime of the user; 

selecting a predesigned action background 
material in accordance with the recorded favorite pastime 
of the user; and, 

automatically controlling the plotter to draw the 
selected predesigned action background material and 
incorporating the at least two visual features most 
fitting to the user within the selected "predesigned 
action background material to produce a continuous and 
personalized drawing of the user acting out his/her 
favorite pastime. 



13. Apparatus for producing a personalized 
pictorial and text document from standardized text 
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material and pictorial background and personal data 
comprising : 

a standardized document including text and 
pictorial background, each of which include blank 
portions therein; 

computer means £or: 

a) storing the locations of the blank positions 
in said standardized document; 

b) storing selected personalized date introduced 
into to the computer; 

c) converting the stored selected personalized 
data into the personalized text and pictorial 
representations and the intended location thereof; 

d) controlling the movement of an impression 
producing device for producing the personalized text and 
pictorial representations on the standardized document in 
the appropriate locations on the standardized document; 
and 

an impression producing device for reproducing on 
said standardized document r the personalized text and 
pictorial representations. 

14. The combination in accordance with Claim 12 
including input means for said computer for introducing 
physical information with respect to the subject of the 
personalization and wherein said computer includes means 
for converting said personalized data into control 
signals for said impression producing device to produce a 
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pictorial representation bearing a correspondence fo the 
physical data inputted. 

15. The combination in accordance with Claim 14 
where said computer stores a plurality of control signals 
for producing a variety of different pictorial 
representations and including means for selecting the 
control signal corresponding to the physical information 
introduced into the input means. 

16. The combination in accordance with Claim 12 
wherein said input means includes a card reader for 
introducing physical information and a keyboard for 
introducing personalized text material. 

17. The combination in accordance with Claim 12 
whereinsaid impression producing device comprises a 
plotter adapted to receive said standardized document for 
plotting thereon and control signals from said computer 
for producing the personalized text and pictorial 
information. 

18. The combination in accordance with Claim 13 
wherein said computer means includes means for storing a 
plurality of control signals for said impression 
producing device, one control signal for each of a number 
of stored components of a pictorial representation and 
one control signal for each variation of each of said 
stored components depending upon the personalized data 
introduced into the computer means. 
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19. The method for producing a personalized 
pictorial and text presentation comprising the steps of; 

storing selected personal information and 
physical data of a person; 

storing pictorial background information to be 
used in the preparation of the presentation; 

storing standardized textual information 
compatable with the pictorial background information; 

converting the stored personal and physical data 
to a pictorial representation of a person; 

combining the standardized textual information 
with the personal information to provide personalized 
text information; and 

reproducing a personalized pictorial rendition 
against the stored pictorial background accompanied by 
personalized text. 

20. The method in accordance with Claim 1 in 
which the storing of personal information and physical 
data is done by physically entering the data on a common 
media. 

21. The method in accordance with Claim 2 whereby 
the storing of personal information and physical data is 
accomplished by making machine readable marks on and by 
machine reading a card. 

22. The method in accordance with Claim 1 wherein 
the step of converting the physical data is accomplished 
by storing a plurality of pictorial representations of 
different physical characteristics; 
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comparing the physical data inputted with the 
stored pictorial representations; and 

selecting the matching pictorial representations 
for reproduction. 

23. The method in accordance with Claim 1 in 
which the step of combining personal data and 
standardized text information comprises the step of 
inputting the personal data ino a computer ^ich stores 
the standardized text information in the appropriate 
position in the text; and 

selecting appropriate gender for the standardized 

text. 

24. The method in accordance with Claim 1 in 
which the step of reproducing the combined pictorial and 
textual greeting card or poster comprises the step of 
printing the personalized textual and pictorial 
information on a standardized background including 
standardized text and background with the personalized 
textual information inserted in the blanks in the 
standardized text and personal pictorial rendition 
inserted in the blanks in the stored pictorial 
background. 
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25. A personalized text and pictorial printed 
presentation produced by the process of: 

storing a plurality of segments of the facial 
features of various types; 

storing a plurality of hair styles; 

storing a plurality of clothing styles; 

introducing personal data of a person to be 
characterized into a storage means r said personal data 
including age category, sex and race; 

introducing personal data of a person including 
name into a storage means; 

selecting facial features, hair style and 
clothing as a function of the personal data introduced 
into said storage means; 

plotting a combination of facial features, hair 
style and clothing as selected to produce a pictorial 
characterization of the person; and 

printing personal data such as the person's name 
along with the pictorial characterization. 

26. The combination in accordance with Claim 25 
wherein said presentation is printed on a preprinted 
background including standardized text whereby said 
standardized txst and personal data such as the person's 
name constitute meaningful personalized text. 

27. The combination in accordance with Claim 25 
wherein the facial features stored include both front 
face and profile whereby both a front face and a profile 
of the person may be presented. 

28. The combination in accordance with Claim 25 
in vAiich the storage means and selecting means comprises 
computer means. 
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